aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2006-07-12 16:04:46 +0000
committerRichard M. Stallman2006-07-12 16:04:46 +0000
commit8aed3f67d3d8d9f8d40a2ec073180ceb2d8fd584 (patch)
tree3c7e8cfb579938c43dffb820bbaeaab64ce9414d
parentfea7b5149b0c05f34810911f3e279d058c2e3b6b (diff)
downloademacs-8aed3f67d3d8d9f8d40a2ec073180ceb2d8fd584.tar.gz
emacs-8aed3f67d3d8d9f8d40a2ec073180ceb2d8fd584.zip
(Info-try-follow-nearest-node): Doc fix.
-rw-r--r--lisp/info.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el
index b448a048e7d..87327d8656b 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3077,7 +3077,8 @@ If FORK is a string, it is the name to use for the new buffer."
3077 3077
3078;; Common subroutine. 3078;; Common subroutine.
3079(defun Info-try-follow-nearest-node (&optional fork) 3079(defun Info-try-follow-nearest-node (&optional fork)
3080 "Follow a node reference near point. Return non-nil if successful." 3080 "Follow a node reference near point. Return non-nil if successful.
3081If FORK is non-nil, it i spassed to `Info-goto-node'."
3081 (let (node) 3082 (let (node)
3082 (cond 3083 (cond
3083 ((Info-get-token (point) "[hf]t?tp://" "[hf]t?tp://\\([^ \t\n\"`({<>})']+\\)") 3084 ((Info-get-token (point) "[hf]t?tp://" "[hf]t?tp://\\([^ \t\n\"`({<>})']+\\)")