Commit 07026166 authored by Glenn Morris's avatar Glenn Morris
Browse files

Further rmail.el fix for bug#13066

* lisp/mail/rmail.el (rmail-maybe-display-summary):
Preserve buffer, in case select-window changes it.
parent 82e1f390
2012-12-06 Glenn Morris <rgm@gnu.org>
* mail/rmail.el (rmail-maybe-display-summary):
Preserve buffer, in case select-window changes it. (Bug#13066)
2012-12-06 Stefan Monnier <monnier@iro.umontreal.ca>
 
* emacs-lisp/cl.el, emacs-lisp/cl-lib.el: Move cl-unload-function and
......
......@@ -4194,6 +4194,7 @@ This has an effect only if a summary buffer exists."
;; Put the summary buffer back on the screen, if user wants that.
(defun rmail-maybe-display-summary ()
(let ((selected (selected-window))
(buffer (current-buffer))
window)
;; If requested, make sure the summary is displayed.
(and rmail-summary-buffer (buffer-name rmail-summary-buffer)
......@@ -4215,7 +4216,8 @@ This has an effect only if a summary buffer exists."
(progn
(select-window window)
(enlarge-window (- rmail-summary-window-size (window-height))))
(select-window selected)))))
(select-window selected)
(set-buffer buffer)))))
;;;; *** Rmail Local Fontification ***
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment