# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 923685762 0
# Node ID 6f29d3fe8aa55af035921d205f2c8a94ea82208a
# Parent  f378efa4aa8a1b1adf6b6abd4da0420f2a5f4bea
(complete-symbol): Invert meaning of prefix arg.

diff -r f378efa4aa8a -r 6f29d3fe8aa5 lisp/bindings.el
--- a/lisp/bindings.el	Fri Apr 09 19:21:52 1999 +0000
+++ b/lisp/bindings.el	Fri Apr 09 19:22:42 1999 +0000
@@ -289,15 +289,19 @@
   "Perform tags completion on the text around point.
 Completes to the set of names listed in the current tags table.
 The string to complete is chosen in the same way as the default
-for \\[find-tag] (which see)."
+for \\[find-tag] (which see).
+
+With a prefix argument, this command does completion within
+the collection of symbols listed in the index of the manual for the
+language you are using."
   (interactive "P")
   (if arg
-      (if (fboundp 'complete-tag)
-	  (complete-tag)
-	;; Don't autoload etags if we have no tags table.
-	(error (substitute-command-keys
-		"No tags table loaded; use \\[visit-tags-table] to load one")))
-    (info-complete-symbol)))
+      (info-complete-symbol)
+    (if (fboundp 'complete-tag)
+	(complete-tag)
+      ;; Don't autoload etags if we have no tags table.
+      (error (substitute-command-keys
+	      "No tags table loaded; use \\[visit-tags-table] to load one")))))
 
 ;; Reduce total amount of space we must allocate during this function
 ;; that we will not need to keep permanently.