Tweak how "u" works in Info buffers when scroll-conservatively is set

* info.el (Info-up): If scroll-conservatively is non-zero and
less than 101, display as much of the superior node above the
target line as possible (Bug#13690).
This commit is contained in:
Stephen Berman
2020-08-25 13:30:58 +02:00
committed by Lars Ingebrigtsen
parent 764bad713e
commit 71209b231a

View File

@@ -2308,7 +2308,11 @@ If SAME-FILE is non-nil, do not move to a different Info file."
nil t))
(progn (beginning-of-line) (if (looking-at "^\\* ") (forward-char 2)))
(goto-char p)
(Info-restore-point Info-history)))))
(Info-restore-point Info-history))))
;; If scroll-conservatively is non-zerop and less than 101, display
;; as much of the superior node above the target line as possible.
(when (< 0 scroll-conservatively 101)
(recenter)))
(defun Info-history-back ()
"Go back in the history to the last node visited."