diff options
| author | Stephen Eglen | 1998-06-29 09:51:39 +0000 |
|---|---|---|
| committer | Stephen Eglen | 1998-06-29 09:51:39 +0000 |
| commit | 9c2ae13ad0af77c58f936abcbb96b2819d9c1c48 (patch) | |
| tree | 8fb98a62420a64787f896e5e597960805c6011b4 | |
| parent | fba78e50eb0cb571682d9b54c3c7ec9caa3ab578 (diff) | |
| download | emacs-9c2ae13ad0af77c58f936abcbb96b2819d9c1c48.tar.gz emacs-9c2ae13ad0af77c58f936abcbb96b2819d9c1c48.zip | |
diary-mail-entries calls exit-calendar when finished.
| -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." | |||
| 642 | (insert (format-time-string "%a %d %b %Y" (current-time))) | 642 | (insert (format-time-string "%a %d %b %Y" (current-time))) |
| 643 | (mail-text) | 643 | (mail-text) |
| 644 | (insert text) | 644 | (insert text) |
| 645 | (mail-send-and-exit nil))) | 645 | (mail-send-and-exit nil) |
| 646 | (exit-calendar))) | ||
| 646 | 647 | ||
| 647 | (defun diary-name-pattern (string-array &optional fullname) | 648 | (defun diary-name-pattern (string-array &optional fullname) |
| 648 | "Convert an STRING-ARRAY, an array of strings to a pattern. | 649 | "Convert an STRING-ARRAY, an array of strings to a pattern. |