emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 18a1c7de2e: Fix mishandling of dnd-scroll-margin with scroll bar


From: Po Lu
Subject: master 18a1c7de2e: Fix mishandling of dnd-scroll-margin with scroll bar motion
Date: Tue, 14 Jun 2022 05:43:46 -0400 (EDT)

branch: master
commit 18a1c7de2e4278493a4ff6dff6add310869b5070
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Fix mishandling of dnd-scroll-margin with scroll bar motion
    
    * lisp/dnd.el (dnd-handle-movement): Ignore posns inside scroll
    bars for now.
---
 lisp/dnd.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/dnd.el b/lisp/dnd.el
index 7eb43f5baa..9d72a4b595 100644
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]