[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mail/rmail.el
From: |
ShengHuo ZHU |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mail/rmail.el |
Date: |
Thu, 07 Feb 2002 10:49:48 -0500 |
Index: emacs/lisp/mail/rmail.el
diff -c emacs/lisp/mail/rmail.el:1.354 emacs/lisp/mail/rmail.el:1.355
*** emacs/lisp/mail/rmail.el:1.354 Sun Feb 3 06:34:29 2002
--- emacs/lisp/mail/rmail.el Wed Feb 6 10:00:31 2002
***************
*** 2058,2069 ****
(recenter old-screen-line)
(if (and all-headers-visible
(not (= (window-start) (point-min))))
! (let ((lines-offscreen (rmail-count-screen-lines
! (point-min)
! (window-start window))))
! (recenter (min (+ old-screen-line lines-offscreen)
! ;; last line of window
! (- (window-height) 2))))))))))
(rmail-highlight-headers))))
(defun rmail-narrow-to-non-pruned-header ()
--- 2058,2064 ----
(recenter old-screen-line)
(if (and all-headers-visible
(not (= (window-start) (point-min))))
! (recenter (- (window-height) 2))))))))
(rmail-highlight-headers))))
(defun rmail-narrow-to-non-pruned-header ()