From de81349bd898a2c26f9ae15ed967484c7475646f Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sat, 21 Jan 2023 08:49:48 -0500 Subject: [PATCH] * lisp/frame.el (handle-move-frame): Fix corner case error --- lisp/frame.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/frame.el b/lisp/frame.el index d9255a55171..39e8a4c88b8 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -239,7 +239,8 @@ that's not the whole story: see `after-focus-change-function'." This function runs the abnormal hook `move-frame-functions'." (interactive "e") (let ((frame (posn-window (event-start event)))) - (run-hook-with-args 'move-frame-functions frame))) + (when (frame-live-p frame) ;Experience shows it can die in the meantime. + (run-hook-with-args 'move-frame-functions frame)))) ;;;; Arrangement of frames at startup -- 2.39.5