Remove quoting in λ!!

This commit is contained in:
Oleksii Filonenko 2019-07-25 20:37:44 +03:00
parent 4299da1eb8
commit 62741a4214
No known key found for this signature in database
GPG key ID: F3510FE5691629A1

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