changeset 5079:1d253bc912d8

(tags-complete-tag): Bind enable-recursive-minibuffers to t.
author Richard M. Stallman <rms@gnu.org>
date Sat, 20 Nov 1993 05:50:01 +0000
parents 698acfd3faa3
children 09f37e86d7da
files lisp/progmodes/etags.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/etags.el	Sat Nov 20 05:17:44 1993 +0000
+++ b/lisp/progmodes/etags.el	Sat Nov 20 05:50:01 1993 +0000
@@ -562,7 +562,9 @@
 ;; but builds tags-completion-table on demand.
 (defun tags-complete-tag (string predicate what)
   (save-excursion
-    (visit-tags-table-buffer)
+    ;; If we need to ask for the tag table, allow that.
+    (let ((enable-recursive-minibuffers t))
+      (visit-tags-table-buffer))
     (if (eq what t)
 	(all-completions string (tags-completion-table) predicate)
       (try-completion string (tags-completion-table) predicate))))