# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 780341395 0
# Node ID 857ced7767c07fcdea7fdeb7d2bfaeb262983e18
# Parent  d68b305849ad725a9d4fcd97318675bfcc2c0eab
(tags-table-check-computed-list): Call tags-verify-table on existing
buffers.

diff -r d68b305849ad -r 857ced7767c0 lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Fri Sep 23 06:55:48 1994 +0000
+++ b/lisp/progmodes/etags.el	Fri Sep 23 17:29:55 1994 +0000
@@ -223,7 +223,11 @@
 	  (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)