mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(mouse-drag-region): Doc fix.

Browse Source
This commit is contained in:
Richard M. Stallman 1993-08-10 17:03:06 +00:00
parent 97c6c316f6
commit 78210c952b
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/mouse.el
View File

@ -158,8 +158,10 @@ Upon exit, point is at the far edge of the newly visible text."
(defun mouse-drag-region (start-event)
"Set the region to the text that the mouse is dragged over.
Highlight the drag area as the user moves the mouse.
This must be bound to a button-down mouse event."
Highlight the drag area as you move the mouse.
This must be bound to a button-down mouse event.
In Transient Mark mode, the highlighting remains once you
release the mouse button. Otherwise, it does not."
(interactive "e")
(let* ((start-posn (event-start start-event))
(start-point (posn-point start-posn))