# HG changeset patch # User Richard M. Stallman # Date 771973962 0 # Node ID b66df6f807403cb2de0aedd2846aa150b4ba10c2 # Parent 05260d3b988d7bf061e8878a2472343c903a4b4e (mail-bury): Test that rmail-summary-buffer is boundp. diff -r 05260d3b988d -r b66df6f80740 lisp/mail/sendmail.el --- a/lisp/mail/sendmail.el Sat Jun 18 21:04:14 1994 +0000 +++ b/lisp/mail/sendmail.el Sat Jun 18 21:12:42 1994 +0000 @@ -334,7 +334,8 @@ (set-buffer (window-buffer (next-window (selected-window) 'not))) (setq rmail-flag (eq major-mode 'rmail-mode)) (setq summary-buffer - (and rmail-summary-buffer + (and (boundp 'rmail-summary-buffer) + rmail-summary-buffer (buffer-name rmail-summary-buffer) (not (get-buffer-window rmail-summary-buffer)) rmail-summary-buffer))))