(tags-table-check-computed-list): Call tags-verify-table on existing

buffers.

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index e39f706b429e6fbcf9bec8856d2b0c5295a0d0c8..1a5802c8214ee03e59438d1128475b7a8ed78e14 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -223,7 +223,11 @@ file the tag was in."
          (while tables
            (setq computed (cons (car tables) computed)
                  table-buffer (get-file-buffer (car tables)))
-           (if table-buffer
+           (if (and table-buffer 
+                    ;; There is a buffer visiting the file.  Now make sure
+                    ;; it is initialized as a tag table buffer.
+                    (save-excursion
+                      (tags-verify-table (buffer-file-name table-buffer))))
                (save-excursion
                  (set-buffer table-buffer)
                  (if (tags-included-tables)