mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-24 10:38:38 +00:00
Code Issues Releases Activity

(mouse-select): Pass an arg to mouse-extend.

Browse Source
This commit is contained in:
Richard M. Stallman 1994-10-11 01:49:05 +00:00
parent 0e7e7a58b7
commit b769185330
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/mouse-sel.el
View File

@ -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.