changeset 22643:4f99ccb85f3a

(Info-find-node): Use byte-to-position.
author Richard M. Stallman <rms@gnu.org>
date Mon, 29 Jun 1998 18:34:24 +0000
parents f392093d562d
children 5f67eacb5c04
files lisp/info.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Mon Jun 29 17:29:15 1998 +0000
+++ b/lisp/info.el	Mon Jun 29 18:34:24 1998 +0000
@@ -463,7 +463,7 @@
 			      ;; above.
 			      (setq guesspos (Info-read-subfile guesspos))))
 		      (error "No such node: %s" nodename)))))
-	    (goto-char (max (point-min) (- guesspos 1000)))
+	    (goto-char (max (point-min) (- (byte-to-position guesspos) 1000)))
 	    ;; Now search from our advised position (or from beg of buffer)
 	    ;; to find the actual node.
 	    (catch 'foo
@@ -637,6 +637,8 @@
 
 ;; Note that on entry to this function the current-buffer must be the
 ;; *info* buffer; not the info tags buffer.
+;; nodepos should be a byte-position such as is found in
+;; the Info file tags table.
 (defun Info-read-subfile (nodepos)
   ;; NODEPOS is either a position (in the Info file as a whole,
   ;; not relative to a subfile) or the name of a subfile.