aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/info.el5
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))