* lisp/x-dnd.el (x-dnd-after-move-frame): Skip dead frames. (Bug#63312)

This commit is contained in:
Eli Zaretskii 2023-05-06 14:16:36 +03:00
parent a081b6625b
commit 15e06260ae

View file

@ -609,8 +609,9 @@ message (format 32) that caused EVENT to be generated."
(defun x-dnd-after-move-frame (frame)
"Handle FRAME moving to a different position.
Clear any cached root window position."
(set-frame-parameter frame 'dnd-root-window-position
nil))
(and (frame-live-p frame)
(set-frame-parameter frame 'dnd-root-window-position
nil)))
(add-hook 'move-frame-functions #'x-dnd-after-move-frame)