procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/dnd.el (dnd-handle-movement): Avoid errors (bug#70311).

Browse source
This commit is contained in:
Eli Zaretskii 2024-04-14 13:16:29 +03:00
parent bbc5204a0f
commit 5971aa1fd3
1 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/dnd.el
View file

@ -149,8 +149,13 @@ Windows."
(with-selected-window window (with-selected-window window
(scroll-down 1)))))))) (scroll-down 1))))))))
(when dnd-indicate-insertion-point (when dnd-indicate-insertion-point
(ignore-errors (let ((pos (posn-point posn)))
(goto-char (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) (defun dnd-handle-one-url (window action url)
"Handle one dropped url by calling the appropriate handler. "Handle one dropped url by calling the appropriate handler.