(rmail-quit): Call quit-window before calling

replace-buffer-in-windows to assure that we can switch the rmail
buffer of the selected window.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 7de2b77..5f46384 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -966,8 +966,8 @@ Instead, these commands are available:
     (replace-buffer-in-windows rmail-summary-buffer)
     (bury-buffer rmail-summary-buffer))
   (let ((obuf (current-buffer)))
-    (replace-buffer-in-windows obuf)
-    (quit-window)))
+    (quit-window)
+    (replace-buffer-in-windows obuf)))
 
 (defun rmail-bury ()
   "Bury current Rmail buffer and its summary buffer."