From a9db66a4f1f842944907741070816f98cc4fb3eb Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 25 Jun 1995 03:06:56 +0000 Subject: [PATCH] (rmail-revert): Use the default revert-buffer-function --- lisp/mail/rmail.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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, -- 2.39.2