comparison lisp/mail/rmail.el @ 36645:cc217d368273

Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Wed, 07 Mar 2001 23:08:12 +0000
parents 46b2ffce9799
children 7c77da3d3841
comparison
equal deleted inserted replaced
36644:054d5c161457 36645:cc217d368273
1936 (let ((lines-offscreen (rmail-count-screen-lines 1936 (let ((lines-offscreen (rmail-count-screen-lines
1937 (point-min) 1937 (point-min)
1938 (window-start window)))) 1938 (window-start window))))
1939 (recenter (min (+ old-screen-line lines-offscreen) 1939 (recenter (min (+ old-screen-line lines-offscreen)
1940 ;; last line of window 1940 ;; last line of window
1941 (- (window-height) 2)))))))))) 1941 (- (window-height) 2)))))))))
1942 (rmail-highlight-headers)))) 1942 (rmail-highlight-headers))))
1943 1943
1944 ;; Lifted from repos-count-screen-lines. 1944 ;; Lifted from repos-count-screen-lines.
1945 ;; Return number of screen lines between START and END. 1945 ;; Return number of screen lines between START and END.
1946 (defun rmail-count-screen-lines (start end) 1946 (defun rmail-count-screen-lines (start end)