[Emacs-diffs] emacs/lisp/mail rmailkwd.el rmailmsc.el rmailou...

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/02/13 07:44:18

Modified files:
        lisp/mail      : rmailkwd.el rmailmsc.el rmailout.el 
                         rmailsort.el 

Log message:
        Update for rmail-show-message -> rmail-show-message-1 name change.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailkwd.el?cvsroot=emacs&r1=1.40&r2=1.41
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailmsc.el?cvsroot=emacs&r1=1.30&r2=1.31
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailout.el?cvsroot=emacs&r1=1.86&r2=1.87
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailsort.el?cvsroot=emacs&r1=1.45&r2=1.46

Patches:
Index: rmailkwd.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailkwd.el,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -b -r1.40 -r1.41
--- rmailkwd.el 13 Feb 2009 03:44:30 -0000      1.40
+++ rmailkwd.el 13 Feb 2009 07:44:18 -0000      1.41
@@ -182,7 +182,7 @@
        (error "No previous message with labels %s" labels)
       (if (> n 0)
          (error "No following message with labels %s" labels)
-       (rmail-show-message lastwin)))))
+       (rmail-show-message-1 lastwin)))))
 
 (provide 'rmailkwd)
 

Index: rmailmsc.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailmsc.el,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- rmailmsc.el 4 Feb 2009 03:39:05 -0000       1.30
+++ rmailmsc.el 13 Feb 2009 07:44:18 -0000      1.31
@@ -49,7 +49,7 @@
       (message "Setting the inbox list for %s for this session"
               (file-name-nondirectory (buffer-file-name)))
       (setq rmail-inbox-list inbox-list)))
-  (rmail-show-message rmail-current-message))
+  (rmail-show-message-1 rmail-current-message))
 
 ;; arch-tag: 94614a62-2a0a-4e25-bac9-06f461ed4c60
 ;;; rmailmsc.el ends here

Index: rmailout.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailout.el,v
retrieving revision 1.86
retrieving revision 1.87
diff -u -b -r1.86 -r1.87
--- rmailout.el 27 Jan 2009 03:42:31 -0000      1.86
+++ rmailout.el 13 Feb 2009 07:44:18 -0000      1.87
@@ -155,7 +155,7 @@
     (if (rmail-summary-exists)
        (rmail-select-summary
         (rmail-update-summary)))
-    (rmail-show-message msg)))
+    (rmail-show-message-1 msg)))
 
 (defun rmail-convert-to-babyl-format ()
   (let ((count 0) (start (point-min))
@@ -392,7 +392,7 @@
     (if (rmail-summary-exists)
        (rmail-select-summary
         (rmail-update-summary)))
-    (rmail-show-message msg)))
+    (rmail-show-message-1 msg)))
 
 ;;; There are functions elsewhere in Emacs that use this function;
 ;;; look at them before you change the calling method.

Index: rmailsort.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailsort.el,v
retrieving revision 1.45
retrieving revision 1.46
diff -u -b -r1.45 -r1.46
--- rmailsort.el        10 Feb 2009 03:36:04 -0000      1.45
+++ rmailsort.el        13 Feb 2009 07:44:18 -0000      1.46
@@ -216,7 +216,7 @@
        (delete-char 1)
        (setq quit-flag nil)
        (rmail-set-message-counters)
-       (rmail-show-message current-message)
+       (rmail-show-message-1 current-message)
        (if return-to-point
            (goto-char return-to-point))
        (if (rmail-summary-exists)