Merge pull request #1594 from filalex77/fix-lambda-prefix-quoting

Fix quoting of command in λ!!
This commit is contained in:
Henrik Lissner 2019-07-25 20:39:18 +02:00 committed by GitHub
commit 4aa577ca3d
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -180,9 +180,9 @@ at the values with which this function was called."
(defun λ!! (command &optional arg)
"Expands to a command that interactively calls COMMAND with prefix ARG."
(declare (doc-string 1))
`(lambda () (interactive)
(let ((current-prefix-arg ,arg))
(call-interactively ,command))))
(lambda () (interactive)
(let ((current-prefix-arg arg))
(call-interactively command))))
(defalias 'lambda!! 'λ!!)
(define-obsolete-function-alias 'FILE! 'file!) ; DEPRECATED