Fix restarting issues

* exwm-workspace.el (exwm-workspace--confirm-kill-emacs):
* exwm.el (exwm-restart): Run `kill-emacs-hook' early; do not check for
X windows before restarting.

1 files changed, 2 insertions, 6 deletions

diff --git a/exwm.el b/exwm.el
index b04990b32946..9a593d5ecac0 100644
--- a/exwm.el
+++ b/exwm.el
@@ -87,15 +87,11 @@
 (defun exwm-restart ()
   "Restart EXWM."
   (interactive)
-  (when (exwm-workspace--confirm-kill-emacs "[EXWM] Restart? ")
-    (server-force-delete)
-    (run-hooks 'kill-emacs-hook)
-    ;; FIXME: more?
+  (when (exwm-workspace--confirm-kill-emacs "[EXWM] Restart? " 'no-check)
     (apply #'call-process (car command-line-args) nil nil nil
            (cdr command-line-args))
     ;; Kill this instance at last.
-    (let ((kill-emacs-hook nil))
-      (kill-emacs))))
+    (kill-emacs)))
 
 (defun exwm--update-window-type (id &optional force)
   "Update _NET_WM_WINDOW_TYPE."