(Info-index): change pattern so that index entries

with colons can be read properly; also, require at
least one space after the colons, which makeinfo
puts in.  From: Aubrey Jaffer <agj@alum.mit.edu>,
7 Nov 2002 21:16:12 -0500, sent to bug-texinfo.

diff --git a/lisp/info.el b/lisp/info.el
index 92e0eebaf23d9175cc4126bbc0a1581821f6a133..56b12db668571636f9d4bdeba2530a5f0b729ac9 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1,6 +1,7 @@
 ;;; info.el --- info package for Emacs
 
-;; Copyright (C) 1985, 86, 92, 93, 94, 95, 96, 97, 98, 99, 2000, 2001, 2002
+;; Copyright (C) 1985, 86, 92, 93, 94, 95, 96, 97, 98, 99, 2000, 2001,
+;; 2002, 2003
 ;;  Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
@@ -1935,7 +1936,7 @@ Give a blank topic name to go to the Index node itself."
       (error "The Info directory node has no index; use m to select a manual"))
   (let ((orignode Info-current-node)
        (rnode nil)
-       (pattern (format "\n\\* +\\([^\n:]*%s[^\n:]*\\):[ \t]*\\([^.\n]*\\)\\.[ \t]*\\([0-9]*\\)"
+       (pattern (format "\n\\* +\\([^\n]*%s[^\n]*\\):[ \t]+\\([^.\n]*\\)\\.[ \t]*\\([0-9]*\\)"
                         (regexp-quote topic)))
        node
        (case-fold-search t))