# HG changeset patch # User Roland McGrath # Date 813261654 0 # Node ID e5431229a09f1c0deafb4bb89545042cec6b0997 # Parent 79eba40cdf02862dec4f583c52762e875eb459f6 (tags-table-check-computed-list): Map tags-expand-table-name over lists of included tables. diff -r 79eba40cdf02 -r e5431229a09f lisp/progmodes/etags.el --- a/lisp/progmodes/etags.el Mon Oct 09 17:45:47 1995 +0000 +++ b/lisp/progmodes/etags.el Mon Oct 09 18:00:54 1995 +0000 @@ -237,8 +237,9 @@ (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.