import xemacs-21.2.37

[chise/xemacs-chise.git.1] / lisp / etags.el

diff --git a/lisp/etags.el b/lisp/etags.el
index e71cbe9..56fc478 100644 (file)
--- a/lisp/etags.el
+++ b/lisp/etags.el
@@ -408,7 +408,7 @@ File name returned is relative to tag table file's directory."
 (defun buffer-tag-table-files ()
   "Returns a list of all files referenced by all TAGS tables that 
 this buffer uses."
 (defun buffer-tag-table-files ()
   "Returns a list of all files referenced by all TAGS tables that 
 this buffer uses."

-  (apply #'nconc
+  (apply #'append

         (mapcar #'tag-table-files (buffer-tag-table-list))))
 
 \f
         (mapcar #'tag-table-files (buffer-tag-table-list))))
 
 \f