diff options
| author | Kenichi Handa | 1998-03-16 05:58:11 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1998-03-16 05:58:11 +0000 |
| commit | 1ad59104de471e09f6586f367cbba60bc2f03a93 (patch) | |
| tree | 61282f4b5224a9d24ed3713ce8ed0c8338baf7f6 | |
| parent | e3a87305b87928adb6aa0f64e58ccff79c19c404 (diff) | |
| download | emacs-1ad59104de471e09f6586f367cbba60bc2f03a93.tar.gz emacs-1ad59104de471e09f6586f367cbba60bc2f03a93.zip | |
(rmail-quit): Call quit-window before calling
replace-buffer-in-windows to assure that we can switch the rmail
buffer of the selected window.
| -rw-r--r-- | lisp/mail/rmail.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 7de2b77d395..5f4638426cc 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -966,8 +966,8 @@ Instead, these commands are available: | |||
| 966 | (replace-buffer-in-windows rmail-summary-buffer) | 966 | (replace-buffer-in-windows rmail-summary-buffer) |
| 967 | (bury-buffer rmail-summary-buffer)) | 967 | (bury-buffer rmail-summary-buffer)) |
| 968 | (let ((obuf (current-buffer))) | 968 | (let ((obuf (current-buffer))) |
| 969 | (replace-buffer-in-windows obuf) | 969 | (quit-window) |
| 970 | (quit-window))) | 970 | (replace-buffer-in-windows obuf))) |
| 971 | 971 | ||
| 972 | (defun rmail-bury () | 972 | (defun rmail-bury () |
| 973 | "Bury current Rmail buffer and its summary buffer." | 973 | "Bury current Rmail buffer and its summary buffer." |