mirror of
https://github.com/emacs-exwm/exwm.git
synced 2025-03-26 21:41:33 +01:00
; exwm--global-minor-mode-body: Fix docstring
* exwm-core.el (exwm--global-minor-mode-body): Fix docstring.
This commit is contained in:
parent
4042de16fd
commit
c3d1bdabb0
1 changed files with 4 additions and 3 deletions
|
@ -411,9 +411,10 @@ One of `line-mode' or `char-mode'.")
|
||||||
vertical-scroll-bar nil))
|
vertical-scroll-bar nil))
|
||||||
|
|
||||||
(defmacro exwm--global-minor-mode-body (name &optional init exit)
|
(defmacro exwm--global-minor-mode-body (name &optional init exit)
|
||||||
"Define EXWM namespaced global minor mode with NAME.
|
"Global minor mode body for mode with NAME.
|
||||||
EXWM's init-hook and exit-hook are modified to call INIT and EXIT functions.
|
The INIT and EXIT functions are added to `exwm-init-hook' and
|
||||||
If an X connection exists, the mode is immediately enabled or disabled."
|
`exwm-exit-hook' respectively. If an X connection exists, the mode is
|
||||||
|
immediately enabled or disabled."
|
||||||
(declare (indent 1) (debug t))
|
(declare (indent 1) (debug t))
|
||||||
(let* ((mode (intern (format "exwm-%s-mode" name)))
|
(let* ((mode (intern (format "exwm-%s-mode" name)))
|
||||||
(init (or init (intern (format "exwm-%s--init" name))))
|
(init (or init (intern (format "exwm-%s--init" name))))
|
||||||
|
|
Loading…
Add table
Reference in a new issue