From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 11 May 1996 18:44:09 +0000 (+0000)
Subject: (win32-handle-scroll-bar-event): Use scroll-bar-maybe-set-window-start.
X-Git-Tag: emacs-19.34~645
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0dd1fa0f1967acaba1fd945289fb9cce04bf09aa;p=emacs.git

(win32-handle-scroll-bar-event): Use scroll-bar-maybe-set-window-start.
---

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 3d42104e888..d5da3ab9f7e 100644
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -96,7 +96,7 @@
        ((eq bar-part 'above-handle)
 	(scroll-down))
        ((eq bar-part 'handle)
-	(scroll-bar-drag-1 event))
+	(scroll-bar-maybe-set-window-start event))
        ((eq bar-part 'below-handle)
 	(scroll-up))
        ((eq bar-part 'down)