From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 3 Jun 2002 22:57:40 +0000 (+0000)
Subject: (Info-extract-pointer): Ignore Info-header-line.
X-Git-Tag: ttn-vms-21-2-B4~14775
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f4e81d49d4a24197176d95ccc629024b8be9d1e4;p=emacs.git

(Info-extract-pointer): Ignore Info-header-line.
---

diff --git a/lisp/info.el b/lisp/info.el
index 37c32270c56..28210b528ac 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1247,10 +1247,10 @@ Bind this in case the user sets it to nil."
     (save-excursion
       (save-restriction
 	(goto-char (point-min))
-	(when Info-header-line
-	  ;; expose the header line in the buffer
-	  (widen)
-	  (forward-line -1))
+;;; 	(when Info-header-line
+;;; 	  ;; expose the header line in the buffer
+;;; 	  (widen)
+;;; 	  (forward-line -1))
 	(let ((bound (point)))
 	  (forward-line 1)
 	  (cond ((re-search-backward (concat name ":") bound t)