diff options
| author | Karl Heuer | 1994-03-01 09:02:19 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-03-01 09:02:19 +0000 |
| commit | d96504df586383ba343b64d9b0e5e6431bc00441 (patch) | |
| tree | 8be861190e15ad1b2b351cd80fa8c4d5c815d950 | |
| parent | ad8fb8aec74d7361695f84e89d6ffce47f480bf1 (diff) | |
| download | emacs-d96504df586383ba343b64d9b0e5e6431bc00441.tar.gz emacs-d96504df586383ba343b64d9b0e5e6431bc00441.zip | |
(Info-restore-point): Don't wipe out hl before using it.
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el index d2cff3aec96..06496692f75 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -583,8 +583,8 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself." | |||
| 583 | (if (and (equal (nth 0 (car hl)) Info-current-file) | 583 | (if (and (equal (nth 0 (car hl)) Info-current-file) |
| 584 | (equal (nth 1 (car hl)) Info-current-node)) | 584 | (equal (nth 1 (car hl)) Info-current-node)) |
| 585 | (progn | 585 | (progn |
| 586 | (setq hl nil) ;terminate the while at next iter | 586 | (goto-char (nth 2 (car hl))) |
| 587 | (goto-char (nth 2 (car hl)))) | 587 | (setq hl nil)) ;terminate the while at next iter |
| 588 | (setq hl (cdr hl))))) | 588 | (setq hl (cdr hl))))) |
| 589 | 589 | ||
| 590 | (defvar Info-last-search nil | 590 | (defvar Info-last-search nil |