Mercurial > emacs
diff lisp/info-look.el @ 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 | fedb9513a26e |
| children | 661e2fe7e775 |
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.