From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 28 Mar 1995 17:42:27 +0000 (+0000)
Subject: (scroll-bar-drag): Bind echo-keystrokes to 0.
X-Git-Tag: emacs-19.34~4713
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c782bea55047f1a15ae78d07a9e2c1ad609d8929;p=emacs.git

(scroll-bar-drag): Bind echo-keystrokes to 0.
---

diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el
index ad1e07abcdb..0a01a1dd7e9 100644
--- a/lisp/scroll-bar.el
+++ b/lisp/scroll-bar.el
@@ -132,7 +132,8 @@ EVENT should be a scroll bar click or drag event."
   "Scroll the window by dragging the scroll bar slider.
 If you click outside the slider, the window scrolls to bring the slider there."
   (interactive "e")
-  (let* (done)
+  (let* (done
+	 (echo-keystrokes 0))
     (or point-before-scroll
 	(setq point-before-scroll (point)))
     (scroll-bar-drag-1 event)