diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-09-03 22:30:48 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-09-03 22:30:48 +0000 |
| commit | 25424f4e44e23776f110a5fde0f2f12517ff945d (patch) | |
| tree | 70453fa40d0af32bd71eb69fddd0437f1e7b67f8 | |
| parent | 1b96d0bc9fd746a230a4e292e320ff1d2e19984d (diff) | |
| download | emacs-25424f4e44e23776f110a5fde0f2f12517ff945d.tar.gz | |
(find-tag-tag): Pass default to completing-read.
| -rw-r--r-- | lisp/progmodes/etags.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index e66d12d07f2..a16cc974986 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -683,7 +683,8 @@ Assumes the tags table is the current buffer." (spec (completing-read (if default (format "%s(default %s) " string default) string) - 'tags-complete-tag))) + 'tags-complete-tag + nil nil nil nil default))) (if (equal spec "") (or default (error "There is no default tag")) spec))) |