Mercurial > emacs

changeset 12377:3cd65cb4c643

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(rmail-revert): Use the default revert-buffer-function
author Richard M. Stallman <rms@gnu.org>
date Sun, 25 Jun 1995 03:06:56 +0000
parents 31e6e3137939
children 3171d5da8a86
files lisp/mail/rmail.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Sat Jun 24 23:40:14 1995 +0000
+++ b/lisp/mail/rmail.el	Sun Jun 25 03:06:56 1995 +0000
@@ -657,7 +657,7 @@
 
 ;; Handle M-x revert-buffer done in an rmail-mode buffer.
 (defun rmail-revert (arg noconfirm)
-  (let (revert-buffer-function)
+  (let ((revert-buffer-function (default-value 'revert-buffer-function)))
     ;; Call our caller again, but this time it does the default thing.
     (if (revert-buffer arg noconfirm)
 	;; If the user said "yes", and we changed something,