(mh-recenter): Call `recenter' with arg t

if ARG is nil.

2 files changed, 4 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d0a8dcf24cf..ef6ad3e9906 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2001-10-23  Gerd Moellmann  <gerd@gnu.org>
 
+        * mail/mh-utils.el (mh-recenter): Call `recenter' with arg t
+        if ARG is nil.
+
         * desktop.el (desktop-last-buffer): New variable.
         (desktop-create-buffer): Set it.
         (desktop-read): Bind it and switch to that buffer.
diff --git a/lisp/mail/mh-utils.el b/lisp/mail/mh-utils.el
index 51cc1b44ee2..2c65f88b507 100644
--- a/lisp/mail/mh-utils.el
+++ b/lisp/mail/mh-utils.el
@@ -447,7 +447,7 @@ Type \"\\[mh-header-display]\" to see the message with all its headers."
   ;; window.  (Commands like save-some-buffers can make this false.)
   (if (eq (get-buffer-window (current-buffer))
           (selected-window))
-      (recenter (if arg arg '(t)))))
+      (recenter (if arg arg t))))
 
 
 (defun mh-delete-line (lines)