ehelp.el: Suppress warning
* lisp/ehelp.el (electric-help-execute-extended): Suppress warning about `execute-extended-command' only being interactive, because we're still using it interactively, but via a wrapper.
This commit is contained in:
@@ -355,7 +355,10 @@ will select it.)"
|
||||
(defun electric-help-execute-extended (_prefixarg)
|
||||
(interactive "p")
|
||||
(setq electric-help-form-to-execute
|
||||
(lambda () (execute-extended-command nil)))
|
||||
(lambda ()
|
||||
(with-suppressed-warnings ((interactive-only
|
||||
execute-extended-command))
|
||||
(execute-extended-command nil))))
|
||||
(electric-help-retain))
|
||||
|
||||
;; This is to be buond to C-x in ehelp mode. Retains ehelp buffer and then
|
||||
|
||||
Reference in New Issue
Block a user