Mercurial > emacs
changeset 45430:d207a1784c9e
(tags-complete-tags-table-file): Don't cons unnecessarily.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 20 May 2002 18:48:33 +0000 |
parents | 5d3b861665f0 |
children | 7505ed4a9b60 |
files | lisp/progmodes/etags.el |
diffstat | 1 files changed, 2 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/etags.el Mon May 20 18:32:07 2002 +0000 +++ b/lisp/progmodes/etags.el Mon May 20 18:48:33 2002 +0000 @@ -1750,10 +1750,8 @@ (let ((enable-recursive-minibuffers t)) (visit-tags-table-buffer)) (if (eq what t) - (all-completions string (mapcar 'list (tags-table-files)) - predicate) - (try-completion string (mapcar 'list (tags-table-files)) - predicate)))) + (all-completions string (tags-table-files) predicate) + (try-completion string (tags-table-files) predicate)))) ;;;###autoload (defun list-tags (file &optional next-match)