From 643fa6d9498e633b540c30c139817e89f893ed5e Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 30 Nov 1999 01:48:03 +0000 Subject: [PATCH] (save-buffers-kill-emacs): Don't use the macro `when' in the body of `defadvice'. Use `if' instead. --- lisp/gnus-start.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index ddc14da..2a45823 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -2316,10 +2316,11 @@ If FORCE is non-nil, the .newsrc file is read." ;; Call the function above at C-x C-c. (defadvice save-buffers-kill-emacs (before save-gnus-newsrc-file-maybe activate) "Save .newsrc and .newsrc.eld when Emacs is killed." - (when (get-buffer gnus-group-buffer) - (gnus-run-hooks 'gnus-exit-gnus-hook) - (gnus-offer-save-summaries) - (gnus-save-newsrc-file))) + (if (get-buffer gnus-group-buffer) + (progn + (gnus-run-hooks 'gnus-exit-gnus-hook) + (gnus-offer-save-summaries) + (gnus-save-newsrc-file)))) (defun gnus-gnus-to-quick-newsrc-format () "Insert Gnus variables such as gnus-newsrc-alist in lisp format." -- 1.7.10.4