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

; Shorten docstrings

Browse source
This commit is contained in:
Adrián Medraño Calvo 2024-01-08 00:00:00 +00:00
parent 4192762223
commit 798dc60a9b
2 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
exwm-input.el
View file

@ -107,7 +107,8 @@ defined in `exwm-mode-map' here."
read-key-sequence-vector read-key-sequence-vector
read-key-sequence read-key-sequence
read-event) read-event)
"Low-level functions that read events and need to be exempted from EXWM's input handling.") "Low-level functions that read events and need to be exempted from
EXWM's input handling.")
(defvar exwm-input--during-command nil (defvar exwm-input--during-command nil
"Indicate whether between `pre-command-hook' and `post-command-hook'.") "Indicate whether between `pre-command-hook' and `post-command-hook'.")
@ -1166,7 +1167,7 @@ One use is to access the keymap bound to KEYS (as prefix keys) in `char-mode'."
(exwm-input--on-minibuffer-exit))) (exwm-input--on-minibuffer-exit)))
(defun exwm-input--call-with-passthrough (function &rest args) (defun exwm-input--call-with-passthrough (function &rest args)
"Bind `exwm-input-line-mode-passthrough' and call the specified FUNCTION with ARGS." "Bind `exwm-input-line-mode-passthrough' and call FUNCTION with ARGS."
(let ((exwm-input-line-mode-passthrough t)) (let ((exwm-input-line-mode-passthrough t))
(apply function args))) (apply function args)))

3
exwm.el
View file

@ -113,7 +113,8 @@
"Name of the subordinate Emacs server.") "Name of the subordinate Emacs server.")
(defvar exwm--server-timeout 1 (defvar exwm--server-timeout 1
"Number of seconds to wait for the subordinate Emacs server to exit before killing it.") "Number of seconds to wait for the subordinate Emacs server to exit before
killing it.")
(defvar exwm--server-process nil "Process of the subordinate Emacs server.") (defvar exwm--server-process nil "Process of the subordinate Emacs server.")