diff options
| author | Richard M. Stallman | 1996-09-25 03:32:13 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-25 03:32:13 +0000 |
| commit | 4ebeb09d6dbb2f0c6dd28bf161d7786b5e71f2bb (patch) | |
| tree | a38adb39af181a601ef7f0ea28eba8ade3244a4f | |
| parent | 84f19a49c7ca3bdd3c223894a8a2523037f2493f (diff) | |
| download | emacs-4ebeb09d6dbb2f0c6dd28bf161d7786b5e71f2bb.tar.gz emacs-4ebeb09d6dbb2f0c6dd28bf161d7786b5e71f2bb.zip | |
(mouse-drag-throw): Bind adjusted-mouse-delta.
| -rw-r--r-- | lisp/mouse-drag.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/mouse-drag.el b/lisp/mouse-drag.el index f8196c75de3..3f41d9f18fd 100644 --- a/lisp/mouse-drag.el +++ b/lisp/mouse-drag.el | |||
| @@ -205,6 +205,7 @@ To test this function, evaluate: | |||
| 205 | col mouse-col-delta window-last-col | 205 | col mouse-col-delta window-last-col |
| 206 | (scroll-col-delta 0) | 206 | (scroll-col-delta 0) |
| 207 | adjusted-mouse-col-delta | 207 | adjusted-mouse-col-delta |
| 208 | adjusted-mouse-delta | ||
| 208 | ;; be conservative about allowing horizontal scrolling | 209 | ;; be conservative about allowing horizontal scrolling |
| 209 | (col-scrolling-p (mouse-drag-should-do-col-scrolling))) | 210 | (col-scrolling-p (mouse-drag-should-do-col-scrolling))) |
| 210 | (select-window start-window) | 211 | (select-window start-window) |