diff options
author | Karl Heuer <[email protected]> | 1996-01-25 00:52:17 +0000 |
---|---|---|
committer | Karl Heuer <[email protected]> | 1996-01-25 00:52:17 +0000 |
commit | b3099c46142e54f5a71dbc086d894a75bb7f945e (patch) | |
tree | 9dc0b887c94321049f9c1512fa63373bce86b278 /lisp/calendar | |
parent | 4120f5f5d2fb7c753801a474cd78f9f077f1f103 (diff) |
(simple-diary-display, fancy-diary-display): Pass proper format string to message.
Diffstat (limited to 'lisp/calendar')
-rw-r--r-- | lisp/calendar/diary-lib.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el index 6840db68fc..b9bb60c049 100644 --- a/lisp/calendar/diary-lib.el +++ b/lisp/calendar/diary-lib.el @@ -385,7 +385,7 @@ changing the variable `diary-include-string'." (and (not (cdr diary-entries-list)) (string-equal (car (cdr (car diary-entries-list))) ""))) (if (<= (length msg) (frame-width)) - (message msg) + (message "%s" msg) (set-buffer (get-buffer-create holiday-buffer)) (setq buffer-read-only nil) (calendar-set-mode-line date-string) @@ -422,7 +422,7 @@ This function is provided for optional use as the `diary-display-hook'." (concat date-string (if holiday-list ":" "")) (mapconcat 'identity holiday-list "; ")))) (if (<= (length msg) (frame-width)) - (message msg) + (message "%s" msg) (set-buffer (get-buffer-create holiday-buffer)) (setq buffer-read-only nil) (calendar-set-mode-line date-string) |