diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-03-28 17:42:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-03-28 17:42:27 +0000 |
| commit | a2f55e59ae60df37b38450d5f7b0734e8e75e0a6 (patch) | |
| tree | d488284890ce6b368b9dbcd89868a6fab5dfd95a /lisp/scroll-bar.el | |
| parent | ead8cb52fba9a7406f686f217f54f4e582e17f74 (diff) | |
| download | emacs-a2f55e59ae60df37b38450d5f7b0734e8e75e0a6.tar.gz | |
(scroll-bar-drag): Bind echo-keystrokes to 0.
Diffstat (limited to 'lisp/scroll-bar.el')
| -rw-r--r-- | lisp/scroll-bar.el | 3 |
1 files changed, 2 insertions, 1 deletions
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) |