Fix bug of 'mouse-drag-and-drop-region' to detect edges of region (Bug#31905)
* lisp/mouse.el (mouse-drag-and-drop-region): Detect both the beginning and the end of character of region during dragging text.
This commit is contained in:
committed by
Martin Rudalics
parent
e292c0973c
commit
d289e7e38a
@@ -2515,9 +2515,9 @@ is copied instead of being cut."
|
||||
(setq drag-but-negligible
|
||||
(and (eq (overlay-buffer mouse-drag-and-drop-overlay)
|
||||
buffer-to-paste)
|
||||
(< (overlay-start mouse-drag-and-drop-overlay)
|
||||
(<= (overlay-start mouse-drag-and-drop-overlay)
|
||||
point-to-paste)
|
||||
(< point-to-paste
|
||||
(<= point-to-paste
|
||||
(overlay-end mouse-drag-and-drop-overlay)))))
|
||||
|
||||
;; Show a tooltip.
|
||||
|
||||
Reference in New Issue
Block a user