Skip to content

Commit

Permalink
checkdoc..
Browse files Browse the repository at this point in the history
  • Loading branch information
countvajhula committed Feb 16, 2025
1 parent 3aecfd8 commit 835efff
Showing 1 changed file with 4 additions and 2 deletions.
6 changes: 4 additions & 2 deletions lithium.el
Original file line number Diff line number Diff line change
Expand Up @@ -128,7 +128,9 @@ and set to true, then also exit the MODE after performing the action."
action))))

(defmacro lithium-define-key (mode key fn &optional exit)
"Bind KEY to FN in MODE."
"Bind KEY to FN in MODE.
If EXIT is `t', exit the mode after running the command."
(let ((keyspec (list key fn (eval exit)))
(keymap (intern
(concat (if (lithium-global-mode-p mode)
Expand All @@ -140,7 +142,7 @@ and set to true, then also exit the MODE after performing the action."

;; TODO: support the "exit" argument properly
(defmacro lithium-define-keys (mode spec)
"Bind keybindings in KEYSPEC in MODE."
"Bind keybindings in SPEC in MODE."
(let ((keymap (intern
(concat
(if (lithium-global-mode-p mode)
Expand Down

0 comments on commit 835efff

Please sign in to comment.