From 725349c8624a73f2901a7dc446236c3cc70b81b1 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 20 May 2002 18:48:33 +0000 Subject: [PATCH] (tags-complete-tags-table-file): Don't cons unnecessarily. --- lisp/progmodes/etags.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 5d0fdf37724..8fe9d54bbd6 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -1750,10 +1750,8 @@ See documentation of variable `tags-file-name'." (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) -- 2.39.5