Mercurial > emacs
changeset 13068:9cc4392719e3
[These changes were actually in the previous version.
This version is a doc fix.]
(mouse-drag-vertical-line): New function.
(mouse-scroll-min-lines): New variable.
(mouse-scroll-subr): Use it.
(mouse-drag-region): Record where the mouse drag has reached
and use that to adjust the drag event before replaying it.
(mouse-drag-region): Store the right end position
in the drag-event before replaying it at the end.
(mouse-skip-word): Skip complete symbol when over a
character with symbol syntax.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 24 Sep 1995 23:20:39 +0000 |
| parents | fef2a9095f0c |
| children | 8197923b82ae |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 6 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Sun Sep 24 03:59:02 1995 +0000 +++ b/lisp/mouse.el Sun Sep 24 23:20:39 1995 +0000 @@ -428,8 +428,12 @@ Setting this to zero causes Emacs to scroll as fast as it can.") (defvar mouse-scroll-min-lines 1 - "*The minimum number of lines scrolled at a time by dragging the mouse -beyond the edge of a window.") + "*The minimum number of lines scrolled by dragging mouse out of window. +Moving the mouse out the top or bottom edge of the window begins +scrolling repeatedly. The number of lines scrolled per repetition +is normally equal to the number of lines beyond the window edge that +the mouse has moved. However, it always scrolls at least the number +of lines specified by this variable.") (defun mouse-scroll-subr (window jump &optional overlay start) "Scroll the window WINDOW, JUMP lines at a time, until new input arrives.