diff options
Diffstat (limited to 'lisp/time.el')
| -rw-r--r-- | lisp/time.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/time.el b/lisp/time.el index f04a22dfd28..522bec46ac6 100644 --- a/lisp/time.el +++ b/lisp/time.el @@ -139,6 +139,11 @@ make the mail indicator stand out on a color display." :version "22.1" :type '(choice (const :tag "None" nil) face)) +(defface display-time-date-and-time nil + "Face for `display-time-format'." + :group 'mode-line-faces + :version "30.1") + (defvar display-time-mail-icon (find-image '((:type xpm :file "letter.xpm" :ascent center) (:type pbm :file "letter.pbm" :ascent center))) @@ -179,6 +184,7 @@ depend on `display-time-day-and-date' and `display-time-24hr-format'." (format-time-string (or display-time-format (if display-time-24hr-format "%H:%M" "%-I:%M%p")) now) + 'face 'display-time-date-and-time 'help-echo (format-time-string "%a %b %e, %Y" now)) load (if mail |