(Info-try-follow-nearest-node): Get the node name

directly out of the menu item pointed at.

diff --git a/lisp/info.el b/lisp/info.el
index 002bc29ff0a1f060a947a8d98266985e11f484f1..928625093c378bb6be6d298e3d5e8da46cf2e3b8 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1682,8 +1682,11 @@ If no reference to follow, moves to the next node, or up if none."
       (Info-follow-reference node))
      ((setq node (Info-get-token (point) "\\* +" "\\* +\\([^:]*\\)::"))
       (Info-goto-node node))
-     ((setq node (Info-get-token (point) "\\* +" "\\* +\\([^:]*\\):"))
-      (Info-menu node))
+     ((Info-get-token (point) "\\* +" "\\* +\\([^:]*\\):")
+      (beginning-of-line)
+      (forward-char 2)
+      (setq node (Info-extract-menu-node-name))
+      (Info-goto-node node))
      ((setq node (Info-get-token (point) "Up: " "Up: \\([^,\n\t]*\\)"))
       (Info-goto-node node))
      ((setq node (Info-get-token (point) "Next: " "Next: \\([^,\n\t]*\\)"))