aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1994-06-18 21:12:42 +0000
committerRichard M. Stallman1994-06-18 21:12:42 +0000
commit6cfc977ba316d4254fb4112e4d04231445883b20 (patch)
treef6d758a375954e6338fc3462b0be0139cedf1494
parentba1e23bf7645113734ca1a953086cf6af8060fb1 (diff)
downloademacs-6cfc977ba316d4254fb4112e4d04231445883b20.tar.gz
emacs-6cfc977ba316d4254fb4112e4d04231445883b20.zip
(mail-bury): Test that rmail-summary-buffer is boundp.
-rw-r--r--lisp/mail/sendmail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 5c192cb76a4..653c630ed7e 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -334,7 +334,8 @@ Prefix arg means don't delete this window."
334 (set-buffer (window-buffer (next-window (selected-window) 'not))) 334 (set-buffer (window-buffer (next-window (selected-window) 'not)))
335 (setq rmail-flag (eq major-mode 'rmail-mode)) 335 (setq rmail-flag (eq major-mode 'rmail-mode))
336 (setq summary-buffer 336 (setq summary-buffer
337 (and rmail-summary-buffer 337 (and (boundp 'rmail-summary-buffer)
338 rmail-summary-buffer
338 (buffer-name rmail-summary-buffer) 339 (buffer-name rmail-summary-buffer)
339 (not (get-buffer-window rmail-summary-buffer)) 340 (not (get-buffer-window rmail-summary-buffer))
340 rmail-summary-buffer)))) 341 rmail-summary-buffer))))