summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2003-02-14 07:02:13 +0000
committerJuanma Barranquero <lekktu@gmail.com>2003-02-14 07:02:13 +0000
commit572e07532face80b82d92ddc55effeb029827cca (patch)
treeba28ffcda61bc0a83af2aa4d1dd9bd8c80aa6ed5 /lisp
parent544dd97560301827451af6e7c1c75872dbfa1b98 (diff)
downloademacs-572e07532face80b82d92ddc55effeb029827cca.tar.gz
(display-time-string-forms): Add face property to mail string.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/time.el1
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 89724f7323d..4ddde522943 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-02-14 ARISAWA Akihiro <ari@mbf.sphere.ne.jp> (tiny change)
+
+ * time.el (display-time-string-forms): Add face property to mail
+ string.
+
2003-02-14 Juanma Barranquero <lektu@terra.es>
* international/mule-cmds.el (view-hello-file): Use `view-file'
diff --git a/lisp/time.el b/lisp/time.el
index 09e5e6b76bd..c0b6c6ab6bd 100644
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -171,6 +171,7 @@ depend on `display-time-day-and-date' and `display-time-24hr-format'."
,@(list :background (face-attribute
display-time-mail-face
:background)))
+ 'face display-time-mail-face
'help-echo "You have new mail; mouse-2: Read mail"
'local-map (make-mode-line-mouse-map 'mouse-2
read-mail-command)))