diff options
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-mode.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el index 10623dba8e3..9abb0c8ecc0 100644 --- a/lisp/eshell/esh-mode.el +++ b/lisp/eshell/esh-mode.el @@ -497,6 +497,8 @@ and the hook `eshell-exit-hook'." (if intercept (setq this-command 'eshell-self-insert-command))))) +(declare-function find-tag-interactive "etags" (prompt &optional no-default)) + (defun eshell-find-tag (&optional tagname next-p regexp-p) "A special version of `find-tag' that ignores read-onlyness." (interactive) @@ -504,8 +506,7 @@ and the hook `eshell-exit-hook'." (let ((inhibit-read-only t) (no-default (eobp)) (find-tag-default-function 'ignore)) - (with-no-warnings - (setq tagname (car (find-tag-interactive "Find tag: ")))) + (setq tagname (car (find-tag-interactive "Find tag: " no-default))) (find-tag tagname next-p regexp-p))) (defun eshell-move-argument (limit func property arg) |