diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-04-09 11:39:41 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-04-09 11:39:41 +0000 |
| commit | d437b3f6bcdf4ca2a8de80d3403b0962c074d35d (patch) | |
| tree | 537e805c9d6f8d432ad24013ec09a8addb0bf407 | |
| parent | 5eabb4e7ee36930c22b209065f8256f817de6061 (diff) | |
| download | emacs-d437b3f6bcdf4ca2a8de80d3403b0962c074d35d.tar.gz | |
(list-tags): Delete call to select-tags-matched-file.
| -rw-r--r-- | lisp/progmodes/etags.el | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index b06c2743ac2..68d56bca5d3 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -1396,11 +1396,8 @@ Searches only in \"tags-file-name\"." (setq file-list (tags-locate-file-in-tags-table filename (if next-match next-match nil))) (if file-list - (if (cdr file-list) - (select-tags-matched-file file-list 'extract-pos-and-tag-from-sel - 'select-file-quit) - (tags-list-functions-in-file (nth 1 (car file-list)) - (nth 2 (car file-list)))) + (tags-list-functions-in-file (nth 1 (car file-list)) + (nth 2 (car file-list))) (message (format "%s not found in tags table" filename))))) ;;;###autoload |