# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 756617463 0
# Node ID 5de9297274f475c17316c3abdf652dfe654bfab5
# Parent  92268e08c16675e1fa280c0fca70250d3f13f913
(visit-tags-table-buffer): Change "Add to list" question.

(etags-goto-tag-location): Improve not-found error msg.

diff -r 92268e08c166 -r 5de9297274f4 lisp/progmodes/etags.el
--- a/lisp/progmodes/etags.el	Thu Dec 23 03:30:12 1993 +0000
+++ b/lisp/progmodes/etags.el	Thu Dec 23 03:31:03 1993 +0000
@@ -484,8 +484,8 @@
 			;; Not found in any existing set.
 			(if (and tags-table-list
 				 (or tags-add-tables
-				     (y-or-n-p (concat "Add to current list"
-						       " of tags tables? "))))
+				     (y-or-n-p (concat "Keep current list of"
+						       " tags tables also? "))))
 			    ;; Add it to the current list.
 			    (setq tags-table-list (cons tags-file-name
 							tags-table-list))
@@ -981,7 +981,7 @@
 	    offset (* 3 offset)))	; expand search window
     (or found
 	(re-search-forward pat nil t)
-	(error "`%s' not found in %s; time to rerun etags"
+	(error "Rerun etags: `%s' not found in %s"
 	       pat buffer-file-name)))
   ;; Position point at the right place
   ;; if the search string matched an extra Ctrl-m at the beginning.