diff options
| -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 92e0eebaf23..56b12db6685 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | ;;; info.el --- info package for Emacs | 1 | ;;; info.el --- info package for Emacs |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1985, 86, 92, 93, 94, 95, 96, 97, 98, 99, 2000, 2001, 2002 | 3 | ;; Copyright (C) 1985, 86, 92, 93, 94, 95, 96, 97, 98, 99, 2000, 2001, |
| 4 | ;; 2002, 2003 | ||
| 4 | ;; Free Software Foundation, Inc. | 5 | ;; Free Software Foundation, Inc. |
| 5 | 6 | ||
| 6 | ;; Maintainer: FSF | 7 | ;; Maintainer: FSF |
| @@ -1935,7 +1936,7 @@ Give a blank topic name to go to the Index node itself." | |||
| 1935 | (error "The Info directory node has no index; use m to select a manual")) | 1936 | (error "The Info directory node has no index; use m to select a manual")) |
| 1936 | (let ((orignode Info-current-node) | 1937 | (let ((orignode Info-current-node) |
| 1937 | (rnode nil) | 1938 | (rnode nil) |
| 1938 | (pattern (format "\n\\* +\\([^\n:]*%s[^\n:]*\\):[ \t]*\\([^.\n]*\\)\\.[ \t]*\\([0-9]*\\)" | 1939 | (pattern (format "\n\\* +\\([^\n]*%s[^\n]*\\):[ \t]+\\([^.\n]*\\)\\.[ \t]*\\([0-9]*\\)" |
| 1939 | (regexp-quote topic))) | 1940 | (regexp-quote topic))) |
| 1940 | node | 1941 | node |
| 1941 | (case-fold-search t)) | 1942 | (case-fold-search t)) |