summaryrefslogtreecommitdiff
path: root/lisp/info-look.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2003-05-11 15:30:12 +0000
committerJuanma Barranquero <lekktu@gmail.com>2003-05-11 15:30:12 +0000
commitbdb0f2d5510b9941d844c12d3f64bcd76087ec9c (patch)
tree1dc233c0343a9abde8b9f30b6b30b5947073560c /lisp/info-look.el
parent9465a86c76ea0a26cfa923d968fb59dde2f541cf (diff)
downloademacs-bdb0f2d5510b9941d844c12d3f64bcd76087ec9c.tar.gz
(info-lookup-make-completions): Allow colons in index entries by looking for ":
" to terminate, as per latest info.el.
Diffstat (limited to 'lisp/info-look.el')
-rw-r--r--lisp/info-look.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info-look.el b/lisp/info-look.el
index b4a8d3be6a8..e81d33e65f2 100644
--- a/lisp/info-look.el
+++ b/lisp/info-look.el
@@ -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 @@ If optional argument QUERY is non-nil, query for the help mode."
(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.