; advice--interactive-form: Fix a typo introduced in recent change

* lisp/emacs-lisp/nadvice.el (advice--interactive-form): Fix a typo.
This commit is contained in:
Štěpán Němec 2022-08-14 10:23:29 +02:00
parent 0df8f481dd
commit b93e14fa0f

View file

@ -170,7 +170,7 @@ DOC is a string where \"FUNCTION\" and \"OLDFUN\" are expected.")
(if (not (and (symbolp function) (autoloadp (indirect-function function))))
(interactive-form function)
(when (commandp function)
`(interactive (advice--eval-interactive-spec
`(interactive (advice-eval-interactive-spec
(cadr (interactive-form ',function)))))))
(defun advice--make-interactive-form (iff ifm)