diff options
| -rw-r--r-- | lisp/calendar/diary-lib.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el index eb6f63d189f..2a27d506eb5 100644 --- a/lisp/calendar/diary-lib.el +++ b/lisp/calendar/diary-lib.el @@ -642,7 +642,8 @@ to run it every morning at 1am." (insert (format-time-string "%a %d %b %Y" (current-time))) (mail-text) (insert text) - (mail-send-and-exit nil))) + (mail-send-and-exit nil) + (exit-calendar))) (defun diary-name-pattern (string-array &optional fullname) "Convert an STRING-ARRAY, an array of strings to a pattern. |