From: Roland McGrath <roland@gnu.org>
Date: Thu, 25 Aug 1994 01:51:34 +0000 (+0000)
Subject: (tags-table-extend-computed-list): In loop processing list of included
X-Git-Tag: emacs-19.34~7230
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e99045bbcd46083d861905ec8dc7ffd38c5104e6;p=emacs.git

(tags-table-extend-computed-list): In loop processing list of included
tables to incorporate it, advance TABLES to its cdr at end of loop.
---

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index ce75dfc3cca..58b53dc1d47 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -273,7 +273,8 @@ file the tag was in."
 		;; 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.
-		(setq computed (cons t computed))))
+		(setq computed (cons t computed)))
+	      (setq tables (cdr tables)))
 	    (setq computed (nreverse computed))
 	    ;; COMPUTED now contains the list of included tables (and
 	    ;; tables included by them, etc.).  Now splice this into the