summaryrefslogtreecommitdiff
path: root/lisp/mouse-drag.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2008-07-05 04:27:37 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2008-07-05 04:27:37 +0000
commit1bd38124f0d586bd555f93c63a3bd13a15aa4a5e (patch)
tree5e5b63c1406aa9001ee052cdbf1c6bfabf525cb9 /lisp/mouse-drag.el
parent41b90495794f94679f36e7b89f4ce32f02449aca (diff)
downloademacs-1bd38124f0d586bd555f93c63a3bd13a15aa4a5e.tar.gz
(mouse-drag-throw, mouse-drag-drag): Autoload.
Diffstat (limited to 'lisp/mouse-drag.el')
-rw-r--r--lisp/mouse-drag.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mouse-drag.el b/lisp/mouse-drag.el
index e3eada70d81..ead45d43959 100644
--- a/lisp/mouse-drag.el
+++ b/lisp/mouse-drag.el
@@ -48,8 +48,7 @@
;; for ``one-click text copy and move''.
;;
;; To use mouse-drag, place the following in your .emacs file:
-;; (require 'mouse-drag)
-;; -and either-
+;; -either-
;; (global-set-key [down-mouse-2] 'mouse-drag-throw)
;; -or-
;; (global-set-key [down-mouse-2] 'mouse-drag-drag)
@@ -187,7 +186,7 @@ If t, the scroll bar moves in the direction the mouse moves.")
(if (< mouse-delta 0) -1 1)
(if mouse-throw-with-scroll-bar 1 -1)))
-
+;;;###autoload
(defun mouse-drag-throw (start-event)
"\"Throw\" the page according to a mouse drag.
@@ -254,6 +253,7 @@ To test this function, evaluate:
;; Now restore the old window.
(select-window old-selected-window)))
+;;;###autoload
(defun mouse-drag-drag (start-event)
"\"Drag\" the page according to a mouse drag.