andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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))