summaryrefslogtreecommitdiff
path: root/lisp/mouse.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-09-24 23:20:39 +0000
committerRichard M. Stallman <rms@gnu.org>1995-09-24 23:20:39 +0000
commita3d6bb976dc4459d5f305758ecc5ebdb861e9e2d (patch)
treec899f112f6df6f0382d1b7fc675d437c654feaa7 /lisp/mouse.el
parent61793fbf5d8248c727ad513f8eecaccb64ab7340 (diff)
downloademacs-a3d6bb976dc4459d5f305758ecc5ebdb861e9e2d.tar.gz
[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.
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r--lisp/mouse.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index d261f97df56..351d307361f 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -428,8 +428,12 @@ This variable's value may be non-integral.
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.