From c782bea55047f1a15ae78d07a9e2c1ad609d8929 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 28 Mar 1995 17:42:27 +0000 Subject: [PATCH] (scroll-bar-drag): Bind echo-keystrokes to 0. --- lisp/scroll-bar.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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) -- 2.39.5