Mirrors/exwm2
2
0
Fork 0
mirror of https://github.com/emacs-exwm/exwm.git synced 2024-11-23 21:17:59 +01:00
Code Issues Projects Releases Packages Wiki Activity

Be more precise when choosing the init hook

Browse source 
* exwm.el (exwm-enable): Run `exwm-init' in
`after-make-frame-functions' only for emacsclient and
`window-setup-hook' only for ordinary sessions.
This commit is contained in:
Chris Feng 2017-11-09 01:28:50 +08:00
parent 088818fedb
commit 21351f6be3
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
exwm.el
View file

@ -726,8 +726,11 @@
;; Ignore unrecognized command line arguments. This can be helpful ;; Ignore unrecognized command line arguments. This can be helpful
;; when EXWM is launched by some session manager. ;; when EXWM is launched by some session manager.
(push #'vector command-line-functions) (push #'vector command-line-functions)
(add-hook 'window-setup-hook #'exwm-init t) ;for Emacs (if (display-graphic-p)
(add-hook 'after-make-frame-functions #'exwm-init t) ;for Emacs Client ;; emacs.
(add-hook 'window-setup-hook #'exwm-init t)
;; emacsclient.
(add-hook 'after-make-frame-functions #'exwm-init t))
(add-hook 'kill-emacs-hook #'exwm--server-stop) (add-hook 'kill-emacs-hook #'exwm--server-stop)
(dolist (i exwm-blocking-subrs) (dolist (i exwm-blocking-subrs)
(advice-add i :around #'exwm--server-eval-at))))) (advice-add i :around #'exwm--server-eval-at)))))