aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mouse-sel.el
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>1994-10-11 01:49:05 +0000
committerRichard M. Stallman <[email protected]>1994-10-11 01:49:05 +0000
commitb76918533048ec846a04bce89f9f4241c767f09f (patch)
tree9e510993a59dc168e75e3dc9f5c2edbd5a9550a5 /lisp/mouse-sel.el
parent0e7e7a58b7ca6ac9481273d5e4325e1d7b699ef9 (diff)
(mouse-select): Pass an arg to mouse-extend.
Diffstat (limited to 'lisp/mouse-sel.el')
-rw-r--r--lisp/mouse-sel.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index 7ada992726..9ca1687d38 100644
--- a/lisp/mouse-sel.el
+++ b/lisp/mouse-sel.el
@@ -254,7 +254,7 @@ This should be bound to a down-mouse event."
(goto-char (car object-bounds))
(set-mark (cdr object-bounds)))
(deactivate-mark)))
- (mouse-extend))
+ (mouse-extend (if mouse-sel-selection-type EVENT)))
(defun mouse-extend (&optional EVENT)
"Extend region/selection using the mouse.