changeset 50950:a7b2bce87058

(info-lookup-make-completions): Allow colons in index entries by looking for ": " to terminate, as per latest info.el.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 11 May 2003 15:27:15 +0000
parents 620ed035578e
children 75cc899eee26
files lisp/info-look.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info-look.el	Sun May 11 15:06:41 2003 +0000
+++ b/lisp/info-look.el	Sun May 11 15:27:15 2003 +0000
@@ -1,7 +1,7 @@
 ;;; info-look.el --- major-mode-sensitive Info index lookup facility
 ;; An older version of this was known as libc.el.
 
-;; Copyright (C) 1995,96,97,98,99,2001  Free Software Foundation, Inc.
+;; Copyright (C) 1995,96,97,98,99,2001,2003  Free Software Foundation, Inc.
 
 ;; Author: Ralph Schleicher <rs@nunatak.allgaeu.org>
 ;;         (did not show signs of life (Nov 2001)  -stef)
@@ -468,7 +468,7 @@
 	      (progn
 		(goto-char (point-min))
 		(and (search-forward "\n* Menu:" nil t)
-		     (while (re-search-forward "\n\\* \\([^:\t\n]*\\):" nil t)
+		     (while (re-search-forward "\n\\* \\(.*\\): " nil t)
 		       (setq entry (match-string 1)
 			     item (funcall trans entry))
 		       ;; `trans' can return nil if the regexp doesn't match.