# HG changeset patch # User Glenn Morris # Date 1234511058 0 # Node ID 1bb96ade48017c291aef2eab0c943357290dd9c3 # Parent ef7ed7efa61cf4d0d4094e75341c7f50ab247745 Update for rmail-show-message -> rmail-show-message-1 name change. diff -r ef7ed7efa61c -r 1bb96ade4801 lisp/mail/rmailkwd.el --- a/lisp/mail/rmailkwd.el Fri Feb 13 07:43:50 2009 +0000 +++ b/lisp/mail/rmailkwd.el Fri Feb 13 07:44:18 2009 +0000 @@ -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) diff -r ef7ed7efa61c -r 1bb96ade4801 lisp/mail/rmailmsc.el --- a/lisp/mail/rmailmsc.el Fri Feb 13 07:43:50 2009 +0000 +++ b/lisp/mail/rmailmsc.el Fri Feb 13 07:44:18 2009 +0000 @@ -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 diff -r ef7ed7efa61c -r 1bb96ade4801 lisp/mail/rmailout.el --- a/lisp/mail/rmailout.el Fri Feb 13 07:43:50 2009 +0000 +++ b/lisp/mail/rmailout.el Fri Feb 13 07:44:18 2009 +0000 @@ -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. diff -r ef7ed7efa61c -r 1bb96ade4801 lisp/mail/rmailsort.el --- a/lisp/mail/rmailsort.el Fri Feb 13 07:43:50 2009 +0000 +++ b/lisp/mail/rmailsort.el Fri Feb 13 07:44:18 2009 +0000 @@ -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)