changeset 37837:39e5892b1843

(Info-read-subfile): Widen before finding the desired node in the subfile.
author Richard M. Stallman <rms@gnu.org>
date Sun, 20 May 2001 17:03:12 +0000
parents 59ee576fc3d2
children 254485af9aa7
files lisp/info.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Sun May 20 17:02:48 2001 +0000
+++ b/lisp/info.el	Sun May 20 17:03:12 2001 +0000
@@ -951,6 +951,8 @@
 	  (info-insert-file-contents lastfilename)
 	  (set-buffer-modified-p nil)
 	  (setq Info-current-subfile lastfilename)))
+    ;; Widen in case we are in the same subfile as before.
+    (widen)
     (goto-char (point-min))
     (if (looking-at "\^_")
 	(forward-char 1)
@@ -1193,7 +1195,6 @@
 		  (message "Searching subfile %s..." (cdr (car list)))
 		  (Info-read-subfile (car (car list)))
 		  (setq list (cdr list))
-;;;		(goto-char (point-min))
 		  (if (re-search-forward regexp nil t)
 		      (setq found (point) list ())))
 		(if found