Commit 631ba13e authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

directly out of the menu item pointed at.
parent 70066cfd
......@@ -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) "\\* +" "\\* +\\([^:]*\\):")
(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]*\\)"))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment