From b1c7e43439f490bbc186a2f0137fc450819a9ea0 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Mon, 9 Oct 1995 18:00:54 +0000 Subject: [PATCH] (tags-table-check-computed-list): Map tags-expand-table-name over lists of included tables. --- lisp/progmodes/etags.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 6d4dc28c674..8650a995dd4 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -237,8 +237,9 @@ file the tag was in." (if (tags-included-tables) ;; Insert the included tables into the list we ;; are processing. - (setcdr tables (append (tags-included-tables) - (cdr tables))))) + (setcdr tables (nconc (mapcar 'tags-expand-table-name + (tags-included-tables)) + (cdr tables))))) ;; This table is not in core yet. Insert a placeholder ;; saying we must read it into core to check for included ;; tables before searching the next table in the list. -- 2.39.2