From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 25 Jun 1995 03:06:56 +0000 (+0000)
Subject: (rmail-revert): Use the default revert-buffer-function
X-Git-Tag: emacs-19.34~3482
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9db66a4f1f842944907741070816f98cc4fb3eb;p=emacs.git

(rmail-revert): Use the default revert-buffer-function
---

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 27ef3a8e7c1..2caa6c4168e 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -657,7 +657,7 @@ Instead, these commands are available:
 
 ;; 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,