summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2003-10-05 13:51:04 +0000
committerRichard M. Stallman <rms@gnu.org>2003-10-05 13:51:04 +0000
commit718e6bc7771b6983b6407b363f583128f96237dd (patch)
treeef2cd00e475b5a5d8fcb406cc9c16f17d18ca57f /lisp
parent28d02da1e7175d61d8c4367ea39f39ad0f5a766a (diff)
downloademacs-718e6bc7771b6983b6407b363f583128f96237dd.tar.gz
(Info-following-node-name): New function.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/info.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el
index 28869c4f469..e11fdbf16ad 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1441,6 +1441,11 @@ End of submatch 0, 1, and 3 are the same, so you can safely concat."
"[" (or allowedchars "^,\t\n") " ]" ;The last char can't be a space.
"\\|\\)\\)")) ;Allow empty node names.
+;;; For compatibility; other files have used this name.
+(defun Info-following-node-name ()
+ (and (looking-at (Info-following-node-name-re))
+ (match-string 1)))
+
(defun Info-next ()
"Go to the next node of this node."
(interactive)