aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLuc Teirlinck <[email protected]>2004-10-24 18:36:28 +0000
committerLuc Teirlinck <[email protected]>2004-10-24 18:36:28 +0000
commitf254e21f8ced9fbdf616b355722bbd210e87171e (patch)
tree37df94fdb4198da479b0b6e2e946485da0daa09e
parent213856ba58b66f84b39d7217c45bbc4d2c2ec2de (diff)
(Info-find-emacs-command-nodes): Adapt to Texinfo-4.7 style indexes.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/info.el3
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7d7a3b8c17..7297a2bc3f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-10-24 Luc Teirlinck <[email protected]>
+
+ * info.el (Info-find-emacs-command-nodes): Adapt to Texinfo-4.7
+ style indexes.
+
2004-10-24 Kai Grossjohann <[email protected]>
* simple.el (process-file): Accept nil for INFILE. Reported by
diff --git a/lisp/info.el b/lisp/info.el
index 17905c6d73..4fc7b5c9cf 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3248,7 +3248,8 @@ The locations are of the format used in `Info-history', i.e.
\(FILENAME NODENAME BUFFERPOS\)."
(let ((where '())
(cmd-desc (concat "^\\* +" (regexp-quote (symbol-name command))
- "\\( <[0-9]+>\\)?:\\s *\\(.*\\)\\.$"))
+ "\\( <[0-9]+>\\)?:\\s *\\(.*\\)\\."
+ "\\([ \t]*(line[ \t]*[0-9]*)\\)?$"))
(info-file "emacs")) ;default
;; Determine which info file this command is documented in.
(if (get command 'info-file)