diff options
| author | Richard M. Stallman | 1998-06-29 18:34:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-06-29 18:34:24 +0000 |
| commit | e99452648333d412a1b4dfb8b159e540cfb47e04 (patch) | |
| tree | 086eb087e5bd77e01ee20eb6ad86355a96f46668 | |
| parent | 5bc3ed3e8f69f8e38b0d7c736b7eb290fcc0f6c8 (diff) | |
| download | emacs-e99452648333d412a1b4dfb8b159e540cfb47e04.tar.gz emacs-e99452648333d412a1b4dfb8b159e540cfb47e04.zip | |
(Info-find-node): Use byte-to-position.
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el index a73780a16c4..8657186dd4e 100644 --- a/lisp/info.el +++ b/lisp/info.el | |||
| @@ -463,7 +463,7 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself." | |||
| 463 | ;; above. | 463 | ;; above. |
| 464 | (setq guesspos (Info-read-subfile guesspos)))) | 464 | (setq guesspos (Info-read-subfile guesspos)))) |
| 465 | (error "No such node: %s" nodename))))) | 465 | (error "No such node: %s" nodename))))) |
| 466 | (goto-char (max (point-min) (- guesspos 1000))) | 466 | (goto-char (max (point-min) (- (byte-to-position guesspos) 1000))) |
| 467 | ;; Now search from our advised position (or from beg of buffer) | 467 | ;; Now search from our advised position (or from beg of buffer) |
| 468 | ;; to find the actual node. | 468 | ;; to find the actual node. |
| 469 | (catch 'foo | 469 | (catch 'foo |
| @@ -637,6 +637,8 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself." | |||
| 637 | 637 | ||
| 638 | ;; Note that on entry to this function the current-buffer must be the | 638 | ;; Note that on entry to this function the current-buffer must be the |
| 639 | ;; *info* buffer; not the info tags buffer. | 639 | ;; *info* buffer; not the info tags buffer. |
| 640 | ;; nodepos should be a byte-position such as is found in | ||
| 641 | ;; the Info file tags table. | ||
| 640 | (defun Info-read-subfile (nodepos) | 642 | (defun Info-read-subfile (nodepos) |
| 641 | ;; NODEPOS is either a position (in the Info file as a whole, | 643 | ;; NODEPOS is either a position (in the Info file as a whole, |
| 642 | ;; not relative to a subfile) or the name of a subfile. | 644 | ;; not relative to a subfile) or the name of a subfile. |