diff --git a/lisp/info.el b/lisp/info.el index c3684deb96..5c383836c8 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -3148,6 +3148,12 @@ Info-next-reference (old-pt (point)) (case-fold-search t)) (or (eobp) (forward-char 1)) + ;; Don't jump over the cross-reference or menu item when the + ;; cursor is on the '*' or space in front of it. + (unless (looking-at " Menu:") + (let ((lbp (line-beginning-position))) + (when (looking-back "^\\* ?" lbp) + (backward-char (if (looking-back "^\\* " lbp) 2 1))))) (or (Info-next-reference-or-link pat 'link) (progn (goto-char (point-min))