From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 28 Sep 2000 14:33:56 +0000 (+0000)
Subject: (Info-extract-pointer): Undo last change.
X-Git-Tag: emacs-pretest-21.0.90~1329
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c1699282747164d60c10b5284fd8c70f8a50b725;p=emacs.git

(Info-extract-pointer): Undo last change.
Instead, fix the position of the `bound' arg to re-search-backward.
---

diff --git a/lisp/info.el b/lisp/info.el
index 661087236ab..34e3a92bd28 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1144,13 +1144,11 @@ Bind this in case the user sets it to nil."
 	(goto-char (point-min))
 	(when Info-header-line
 	  ;; expose the header line in the buffer
-	  (let ((end (point-max)))
-	    (widen)
-	    (forward-line -1)
-	    (narrow-to-region (point) end)))
+	  (widen)
+	  (forward-line -1))
 	(let ((bound (point)))
 	  (forward-line 1)
-	  (cond ((re-search-backward (concat name ":") nil bound)
+	  (cond ((re-search-backward (concat name ":") bound t)
 	    (goto-char (match-end 0))
 	    (Info-following-node-name))
 		((not (eq errorname t))