aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2009-02-13 07:48:13 +0000
committerGlenn Morris2009-02-13 07:48:13 +0000
commitbc04f2072371259bcf77d1d513ce5be74ea953c2 (patch)
treecd1e7abd3d3c31eb0d02366cacf0b9e75ec6050d
parent809f3af083048e9a74d9f07c2581514facc09122 (diff)
downloademacs-bc04f2072371259bcf77d1d513ce5be74ea953c2.tar.gz
emacs-bc04f2072371259bcf77d1d513ce5be74ea953c2.zip
Update for rmail-show-message-maybe name change.
-rw-r--r--lisp/ChangeLog10
-rw-r--r--lisp/mail/rmailsum.el6
2 files changed, 13 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 31347cd3197..66922bd2a40 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,15 @@
12009-02-13 Glenn Morris <rgm@gnu.org> 12009-02-13 Glenn Morris <rgm@gnu.org>
2 2
3 * mail/rmail.el (rmail-show-message-1): New name for the old
4 rmail-show-message.
5 * mail/rmail.el, mail/rmailkwd.el, mail/rmailmsc.el, mail/rmailout.el:
6 * mail/rmailsort.el: Update for rmail-show-message name change.
7
8 * mail/rmail.el (rmail-show-message): New name for the old
9 rmail-show-message-maybe.
10 * mail/rmail.el, mail/rmailsum.el: Update for rmail-show-message-maybe
11 name change.
12
3 * mail/rmailsum.el (msgnum): Remove declaration. 13 * mail/rmailsum.el (msgnum): Remove declaration.
4 (rmail-summary-redo): Add missing initialization value. 14 (rmail-summary-redo): Add missing initialization value.
5 (rmail-summary-overlay, rmail-summary-mode-map): Add doc string. 15 (rmail-summary-overlay, rmail-summary-mode-map): Add doc string.
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index ce7a74a992d..6940f3d4ba6 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -958,12 +958,12 @@ Search, the `unseen' attribute is restored.")
958 (unwind-protect 958 (unwind-protect
959 (progn 959 (progn
960 (select-window window) 960 (select-window window)
961 (rmail-show-message-maybe msg-num t)) 961 (rmail-show-message msg-num t))
962 (select-window owin)) 962 (select-window owin))
963 (if (buffer-name rmail-buffer) 963 (if (buffer-name rmail-buffer)
964 (save-excursion 964 (save-excursion
965 (set-buffer rmail-buffer) 965 (set-buffer rmail-buffer)
966 (rmail-show-message-maybe msg-num t)))))) 966 (rmail-show-message msg-num t))))))
967 (rmail-summary-update-highlight nil))))) 967 (rmail-summary-update-highlight nil)))))
968 968
969(defun rmail-summary-save-buffer () 969(defun rmail-summary-save-buffer ()
@@ -1223,7 +1223,7 @@ Returns non-nil if message N was found."
1223 (let ((selwin (selected-window))) 1223 (let ((selwin (selected-window)))
1224 (unwind-protect 1224 (unwind-protect
1225 (progn (pop-to-buffer buf) 1225 (progn (pop-to-buffer buf)
1226 (rmail-show-message-maybe n)) 1226 (rmail-show-message n))
1227 (select-window selwin) 1227 (select-window selwin)
1228 ;; The actions above can alter the current buffer. Preserve it. 1228 ;; The actions above can alter the current buffer. Preserve it.
1229 (set-buffer obuf)))) 1229 (set-buffer obuf))))