From d1655a8c71676afaf00d514a213dd6352b3a826f Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sun, 14 Apr 2024 13:16:29 +0300 Subject: [PATCH] * lisp/dnd.el (dnd-handle-movement): Avoid errors (bug#70311). (cherry picked from commit 5971aa1fd32583a8d50b67a56cf1b40f1665fca0) --- lisp/dnd.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/dnd.el b/lisp/dnd.el index f7eb074076e..e721dd0570c 100644 --- a/lisp/dnd.el +++ b/lisp/dnd.el @@ -151,8 +151,13 @@ Windows." (with-selected-window window (scroll-down 1)))))))) (when dnd-indicate-insertion-point - (ignore-errors - (goto-char (posn-point posn))))))) + (let ((pos (posn-point posn))) + ;; We avoid errors here, since on some systems this runs + ;; when waiting_for_input is non-zero, and that aborts on + ;; error. + (if (and pos (<= (point-min) pos (point-max))) + (goto-char pos) + pos)))))) (defun dnd-handle-one-url (window action url) "Handle one dropped url by calling the appropriate handler. -- 2.39.5