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)