pestctrl/emacs
1
0
Fork 0
forked from Github/emacs
Code Issues Pull requests Projects Releases Packages Wiki Activity

* lisp/frame.el (handle-move-frame): Fix corner case error

Browse source
This commit is contained in:
Stefan Monnier 2023-01-21 08:49:48 -05:00
parent 1c39347d58
commit de81349bd8
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/frame.el
View file

@ -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