aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1994-06-30 04:49:26 +0000
committerRichard M. Stallman1994-06-30 04:49:26 +0000
commit5fb9cdd99eb2dceb0ed5fcf8a9a9b3add735e6fc (patch)
treeab078d8832d4d70e0a1500ee9792aca89abc48a2
parent40e6f148a4f209fba924f4f50260a907d0ce7124 (diff)
downloademacs-5fb9cdd99eb2dceb0ed5fcf8a9a9b3add735e6fc.tar.gz
emacs-5fb9cdd99eb2dceb0ed5fcf8a9a9b3add735e6fc.zip
(mouse-drag-secondary): Don't treat end of buffer
specially when within the window.
-rw-r--r--lisp/mouse.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index e2892dc4208..231568bb8ea 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -629,8 +629,7 @@ This must be bound to a button-down mouse event."
629 ;; Are we moving within the original window? 629 ;; Are we moving within the original window?
630 ((and (eq (posn-window end) start-window) 630 ((and (eq (posn-window end) start-window)
631 (integer-or-marker-p end-point)) 631 (integer-or-marker-p end-point))
632 (if (/= start-point end-point) 632 (set-marker mouse-secondary-start nil)
633 (set-marker mouse-secondary-start nil))
634 (let ((range (mouse-start-end start-point end-point 633 (let ((range (mouse-start-end start-point end-point
635 click-count))) 634 click-count)))
636 (move-overlay mouse-secondary-overlay 635 (move-overlay mouse-secondary-overlay