diff options
| author | Stefan Monnier | 2023-08-15 10:21:51 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2023-08-15 10:21:51 -0400 |
| commit | 7ba76dc9c3efbbcdbeb47529744ec4da5dae6ada (patch) | |
| tree | a884660380144d560e13081a347b4b11ffc91d38 | |
| parent | 5c101b1adac2b4f3cc4e08a6492b406952c529f3 (diff) | |
| download | emacs-7ba76dc9c3efbbcdbeb47529744ec4da5dae6ada.tar.gz emacs-7ba76dc9c3efbbcdbeb47529744ec4da5dae6ada.zip | |
lisp/help-fns.el: Revert commit c12838c73ef161850a081f9ccea6e375b7c2f93b
* lisp/help-fns.el (help-fns--describe-function-or-command-prompt):
Don't allow specifying a non-existing function.
| -rw-r--r-- | lisp/help-fns.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index bedc5a9e49b..81c58ba1998 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el | |||
| @@ -229,11 +229,11 @@ interactive command." | |||
| 229 | (lambda (f) (if want-command | 229 | (lambda (f) (if want-command |
| 230 | (commandp f) | 230 | (commandp f) |
| 231 | (or (fboundp f) (get f 'function-documentation)))) | 231 | (or (fboundp f) (get f 'function-documentation)))) |
| 232 | ;; We use 'confirm' here, unlike in other describe-* | 232 | ;; We used `confirm' for a while because we may want to see the |
| 233 | ;; commands, for cases like a function that is advised | 233 | ;; meta-info about a function even if the function itself is not |
| 234 | ;; but not yet defined (e.g., if 'advice-add' is called | 234 | ;; defined, but this use case is too marginal and rarely tested, |
| 235 | ;; before defining the function). | 235 | ;; not worth the trouble (bug#64902). |
| 236 | 'confirm nil nil | 236 | t nil nil |
| 237 | (and fn (symbol-name fn))))) | 237 | (and fn (symbol-name fn))))) |
| 238 | (unless (equal val "") | 238 | (unless (equal val "") |
| 239 | (setq fn (intern val))) | 239 | (setq fn (intern val))) |