# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1137463664 0
# Node ID 51ca63f92c59fd06289e3ef2397968a87d5bbb5a
# Parent  8cac036adedc772086cb8258cb4ba8234642366b
(Info-revert-find-node): Check for Info-current-file
before preserving new-history.

diff -r 8cac036adedc -r 51ca63f92c59 lisp/info.el
--- a/lisp/info.el	Tue Jan 17 01:43:00 2006 +0000
+++ b/lisp/info.el	Tue Jan 17 02:07:44 2006 +0000
@@ -731,7 +731,8 @@
 	(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)