emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Expand on lambda!/lambda!!'s docstrings

Browse source
This commit is contained in:
Henrik Lissner 2019-12-13 14:35:28 -05:00
parent 33dfe85c66
commit 8224f14d92
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
core/core-lib.el
View file

@ -101,13 +101,17 @@ at the values with which this function was called."
;;; Sugars ;;; Sugars
(defmacro λ! (&rest body) (defmacro λ! (&rest body)
"Expands to (lambda () (interactive) ,@body)." "Expands to (lambda () (interactive) ,@body).
A factory for quickly producing interaction commands, particularly for keybinds
or aliases."
(declare (doc-string 1)) (declare (doc-string 1))
`(lambda () (interactive) ,@body)) `(lambda () (interactive) ,@body))
(defalias 'lambda! 'λ!) (defalias 'lambda! 'λ!)
(defun λ!! (command &optional arg) (defun λ!! (command &optional arg)
"Expands to a command that interactively calls COMMAND with prefix ARG." "Expands to a command that interactively calls COMMAND with prefix ARG.
A factory for quickly producing interactive, prefixed commands for keybinds or
aliases."
(declare (doc-string 1)) (declare (doc-string 1))
(lambda () (interactive) (lambda () (interactive)
(let ((current-prefix-arg arg)) (let ((current-prefix-arg arg))