diff options
| author | Richard M. Stallman | 1992-10-05 10:15:45 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1992-10-05 10:15:45 +0000 |
| commit | bcd4064a21f5b0b8d40554f3848f1c2e91cb7010 (patch) | |
| tree | 0a95b8d82db03ebf64d86bfa11747bd3c703b57e | |
| parent | 99e5add39ce0fac5f9d41f2e4716e3353709b614 (diff) | |
| download | emacs-bcd4064a21f5b0b8d40554f3848f1c2e91cb7010.tar.gz emacs-bcd4064a21f5b0b8d40554f3848f1c2e91cb7010.zip | |
(Info-restore-point): Delete duplicate definition.
| -rw-r--r-- | lisp/info.el | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lisp/info.el b/lisp/info.el index c7939272948..c690b80b9f9 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -329,14 +329,6 @@ to read a file name from the minibuffer." | |||
| 329 | (goto-char (nth 2 (car hl))) | 329 | (goto-char (nth 2 (car hl))) |
| 330 | (Info-restore-point (cdr hl))))) | 330 | (Info-restore-point (cdr hl))))) |
| 331 | 331 | ||
| 332 | (defun Info-restore-point (hl) | ||
| 333 | "If this node has been visited, restore the point value when we left." | ||
| 334 | (if hl | ||
| 335 | (if (and (equal (nth 0 (car hl)) Info-current-file) | ||
| 336 | (equal (nth 1 (car hl)) Info-current-node)) | ||
| 337 | (goto-char (nth 2 (car hl))) | ||
| 338 | (Info-restore-point (cdr hl))))) | ||
| 339 | |||
| 340 | (defvar Info-last-search nil | 332 | (defvar Info-last-search nil |
| 341 | "Default regexp for \\<info-mode-map>\\[Info-search] command to search for.") | 333 | "Default regexp for \\<info-mode-map>\\[Info-search] command to search for.") |
| 342 | 334 | ||