Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

(display-time-string-forms): Add help-echo with date on time.

Browse source
This commit is contained in:
Stefan Monnier 2004-03-19 02:34:39 +00:00
parent e3748ba235
commit e93b2f39b2
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/time.el
View file

@ -173,9 +173,11 @@ depend on `display-time-day-and-date' and `display-time-24hr-format'."
'((if (and (not display-time-format) display-time-day-and-date)
(format-time-string "%a %b %e " now)
"")
(format-time-string (or display-time-format
(if display-time-24hr-format "%H:%M" "%-I:%M%p"))
now)
(propertize
(format-time-string (or display-time-format
(if display-time-24hr-format "%H:%M" "%-I:%M%p"))
now)
'help-echo (format-time-string "%s %b %e, %Y" now))
load
(if mail
;; Build the string every time to act on customization.