mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-17 17:58:46 +00:00
Code Issues Releases Activity

Fix mishandling of dnd-scroll-margin with scroll bar motion

Browse Source 
* lisp/dnd.el (dnd-handle-movement): Ignore posns inside scroll
bars for now.
This commit is contained in:
Po Lu 2022-06-14 17:43:08 +08:00
parent 99cb3a7154
commit 18a1c7de2e
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/dnd.el
View File

@ -112,7 +112,9 @@ program."
"Handle mouse movement to POSN when receiving a drop from another program."
(when (windowp (posn-window posn))
(with-selected-window (posn-window posn)
(when dnd-scroll-margin
(when (and dnd-scroll-margin
;; TODO: handle scroll bars reasonably.
(not (posn-area posn)))
(ignore-errors
(let* ((row (cdr (posn-col-row posn)))
(window (when (windowp (posn-window posn))