From: Richard M. Stallman Date: Thu, 23 Dec 1993 03:31:03 +0000 (+0000) Subject: (visit-tags-table-buffer): Change "Add to list" question. X-Git-Tag: emacs-19.34~10572 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f9b1c0b224226e89ebb0290287ba5ee58e3108cd;p=emacs.git (visit-tags-table-buffer): Change "Add to list" question. (etags-goto-tag-location): Improve not-found error msg. --- diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index b8bfaa6301d..c39eed6d344 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -484,8 +484,8 @@ Returns t if it visits a tags table, or nil if there are no more in the list." ;; 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 @@ See documentation of variable `tags-file-name'." 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.