(Info-restore-point): Don't wipe out hl before using it.

d96504df · Karl Heuer · ad8fb8ae · d96504df
Commit d96504df authored Mar 01, 1994 by Karl Heuer
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/info.el lisp/info.el +2 -2

No files found.
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -583,8 +583,8 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself."
    (if (and (equal (nth 0 (car hl)) Info-current-file)
 	     (equal (nth 1 (car hl)) Info-current-node))
 	(progn
-	  (setq hl nil)			;terminate the while at next iter
-	  (goto-char (nth 2 (car hl))))
+	  (goto-char (nth 2 (car hl)))
+	  (setq hl nil))		;terminate the while at next iter
      (setq hl (cdr hl)))))

 (defvar Info-last-search nil