(Info-revert-find-node): Check for Info-current-file

before preserving new-history.
This commit is contained in:
Juri Linkov 2006-01-17 02:07:44 +00:00
parent 84bf6ad84e
commit 96639c8970

View file

@ -731,7 +731,8 @@ is preserved, if possible."
(pline (count-lines (point-min) (line-beginning-position)))
(wline (count-lines (point-min) (window-start)))
(old-history Info-history)
(new-history (list Info-current-file Info-current-node (point))))
(new-history (and Info-current-file
(list Info-current-file Info-current-node (point)))))
(kill-buffer (current-buffer))
(Info-find-node filename nodename)
(setq Info-history old-history)