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."
 ;; Common subroutine.
 (defun Info-try-follow-nearest-node (&optional fork)
-  "Follow a node reference near point.  Return non-nil if successful."
+  "Follow a node reference near point.  Return non-nil if successful.
+If FORK is non-nil, it i spassed to `Info-goto-node'."
  (let (node)
    (cond
     ((Info-get-token (point) "[hf]t?tp://" "[hf]t?tp://\\([^ \t\n\"`({<>})']+\\)")

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.
		3081	If 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\"`({<>})']+\\)")