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

diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el
index ad1e07abcdb72f63af06bc363c6c8970e7554407..0a01a1dd7e98a1299016326ba388ef3c445fc4bf 100644 (file)
--- 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)