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

Fix wrong-number-of-args error from cmd!! macro

Browse Source
This commit is contained in:
Henrik Lissner
2020-07-24 18:17:33 -04:00
parent 7a276dbf6b
commit 2441d28ad1
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
core/core-lib.el
View File

@ -258,7 +258,10 @@ aliases."
(declare (doc-string 1) (pure t) (side-effect-free t)) (declare (doc-string 1) (pure t) (side-effect-free t))
`(lambda (arg &rest _) (interactive "P") `(lambda (arg &rest _) (interactive "P")
(let ((current-prefix-arg (or ,prefix-arg arg))) (let ((current-prefix-arg (or ,prefix-arg arg)))
(funcall-interactively ,command ,@args)))) (,(if args
'funcall-interactively
'call-interactively)
,command ,@args))))
(defmacro cmds! (&rest branches) (defmacro cmds! (&rest branches)
"Expands to a `menu-item' dispatcher for keybinds." "Expands to a `menu-item' dispatcher for keybinds."