Fix bits of last change lost in Emacs crash.

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 08eb0b5dd4535d67f31ecbd9c343a9a41a1420df..517e6d71154c0d6ac79fcd2e78ee42bce566dcf0 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -369,9 +369,11 @@ Returns non-nil iff it is a valid table."
                ;; the one which includes the table we found.
                (setq could-be (cons (car elt) could-be)))
            (setq elt (cdr elt)))
-         ;; The last element we found in the computed list before
-         ;; FOUND that appears in the 
-    found))
+         ;; The last element we found in the computed list before FOUND
+         ;; that appears in the user's list will be the table that
+         ;; included the one we found.  This will be the head of the
+         ;; COULD-BE list.
+         (car could-be)))))
 
 ;; Subroutine of visit-tags-table-buffer.  Move tags-table-list-pointer
 ;; along and set tags-file-name.  Returns nil when out of tables.