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

(mouse-drag-secondary): Don't treat end of buffer

Browse Source 
specially when within the window.
This commit is contained in:
Richard M. Stallman 1994-06-30 04:49:26 +00:00
parent 40e6f148a4
commit 5fb9cdd99e
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/mouse.el
View File

@ -629,8 +629,7 @@ This must be bound to a button-down mouse event."
;; Are we moving within the original window?
((and (eq (posn-window end) start-window)
(integer-or-marker-p end-point))
(if (/= start-point end-point)
(set-marker mouse-secondary-start nil))
(set-marker mouse-secondary-start nil)
(let ((range (mouse-start-end start-point end-point
click-count)))
(move-overlay mouse-secondary-overlay