# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 932604300 0
# Node ID d45a32b777f6ab6680562cfb5f0b9f6699447a9b
# Parent  a3b19ebb46f98f93a7fc1695c24ffd0768e0ac7b
(info-lookup-setup-mode): Don't give up, if
info-lookup-make-completions returns an error.
(info-lookup-maybe-add-help :mode 'latex-mode): Use Info file
name latex, not latex2e.

diff -r a3b19ebb46f9 -r d45a32b777f6 lisp/info-look.el
--- a/lisp/info-look.el	Thu Jul 22 00:41:21 1999 +0000
+++ b/lisp/info-look.el	Thu Jul 22 00:45:00 1999 +0000
@@ -400,7 +400,9 @@
 	  (setq refer-modes (nreverse refer-modes))
 	  ;; Build the full completion alist.
 	  (setq completions
-		(nconc (info-lookup-make-completions topic mode)
+		(nconc (condition-case nil
+			   (info-lookup-make-completions topic mode)
+			 (error nil))
 		       (apply 'append
 			      (mapcar (lambda (arg)
 					(info-lookup->completions topic arg))
@@ -712,7 +714,7 @@
 (info-lookup-maybe-add-help
  :mode 'latex-mode
  :regexp "\\\\\\([a-zA-Z]+\\|[^a-zA-Z]\\)"
- :doc-spec '(("(latex2e)Command Index" nil
+ :doc-spec '(("(latex)Command Index" nil
 	      "`" "\\({[^}]*}\\)?'")))
 
 (info-lookup-maybe-add-help