Mercurial > emacs
changeset 15264:0eb55cad57c6
(scroll-bar-maybe-set-window-start): Always set
window start, to ensure scroll bar position is updated.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 21 May 1996 14:40:27 +0000 |
parents | 0d7899c372ed |
children | 658224992372 |
files | lisp/scroll-bar.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/scroll-bar.el Tue May 21 14:31:40 1996 +0000 +++ b/lisp/scroll-bar.el Tue May 21 14:40:27 1996 +0000 @@ -144,7 +144,9 @@ (1+ portion-start))) (if (or (> current-start next-portion-start) (< current-start portion-start)) - (set-window-start window portion-start))))) + (set-window-start window portion-start) + ;; Always set window start, to ensure scroll bar position is updated. + (set-window-start window current-start))))) ;; Scroll the window to the proper position for EVENT. (defun scroll-bar-drag-1 (event)