awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases 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
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))