From: Stefan Monnier 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))