changeset 22638:704aa3875781

diary-mail-entries calls exit-calendar when finished.
author Stephen Eglen <stephen@gnu.org>
date Mon, 29 Jun 1998 09:51:39 +0000
parents 030c40f7d202
children 8177901b437a
files lisp/calendar/diary-lib.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/diary-lib.el	Sun Jun 28 22:52:49 1998 +0000
+++ b/lisp/calendar/diary-lib.el	Mon Jun 29 09:51:39 1998 +0000
@@ -642,7 +642,8 @@
     (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.