diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2003-05-11 15:30:12 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2003-05-11 15:30:12 +0000 |
commit | bdb0f2d5510b9941d844c12d3f64bcd76087ec9c (patch) | |
tree | 1dc233c0343a9abde8b9f30b6b30b5947073560c /lisp/info-look.el | |
parent | 9465a86c76ea0a26cfa923d968fb59dde2f541cf (diff) | |
download | emacs-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.el | 4 |
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. |