Mercurial > emacs
changeset 11145:fb77829412af
(scroll-bar-drag): Bind echo-keystrokes to 0.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 28 Mar 1995 17:42:27 +0000 |
| parents | c2b689aeb934 |
| children | 9a14b32f5d71 |
| files | lisp/scroll-bar.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/scroll-bar.el Tue Mar 28 17:34:52 1995 +0000 +++ b/lisp/scroll-bar.el Tue Mar 28 17:42:27 1995 +0000 @@ -132,7 +132,8 @@ "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)