diff options
| author | Richard M. Stallman | 1994-06-18 21:12:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-06-18 21:12:42 +0000 |
| commit | 6cfc977ba316d4254fb4112e4d04231445883b20 (patch) | |
| tree | f6d758a375954e6338fc3462b0be0139cedf1494 | |
| parent | ba1e23bf7645113734ca1a953086cf6af8060fb1 (diff) | |
| download | emacs-6cfc977ba316d4254fb4112e4d04231445883b20.tar.gz emacs-6cfc977ba316d4254fb4112e4d04231445883b20.zip | |
(mail-bury): Test that rmail-summary-buffer is boundp.
| -rw-r--r-- | lisp/mail/sendmail.el | 3 |
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)))) |