1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(sunrise-sunset): Pass proper format string to message.

This commit is contained in:
Karl Heuer 1996-01-25 00:57:33 +00:00
parent 23161c61c4
commit 498020d2b5

View file

@ -845,10 +845,11 @@ This function is suitable for execution in a .emacs file."
(msg (format "%s: %s" date-string time-string))
(one-window (one-window-p t)))
(if (<= (length msg) (frame-width))
(message msg)
(message "%s" msg)
(with-output-to-temp-buffer "*temp*"
(princ (concat date-string "\n" time-string)))
(message (substitute-command-keys
(message "%s"
(substitute-command-keys
(if one-window
(if pop-up-windows
"Type \\[delete-other-windows] to remove temp window."