diff options
| author | Karl Berry <[email protected]> | 2003-01-22 20:35:23 +0000 |
|---|---|---|
| committer | Karl Berry <[email protected]> | 2003-01-22 20:35:23 +0000 |
| commit | 35ab7deba3a54e7362ccb6ddc6079e79afdd19f9 (patch) | |
| tree | 9f26d22d4d77fb762adbe5b2f9c9d519c2bca20d | |
| parent | 8f417b3bb8af90455cbb68218012fe37ed5db78d (diff) | |
(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 <[email protected]>,
7 Nov 2002 21:16:12 -0500, sent to bug-texinfo.
| -rw-r--r-- | lisp/info.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el index 92e0eebaf2..56b12db668 100644 --- 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)) |