# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1023145060 0
# Node ID 929f8c01b822c5db0ba4cda6812fe83067c203b1
# Parent  9d60ac21968fb476a927ba416fbb1a04e5e9e384
(Info-extract-pointer): Ignore Info-header-line.

diff -r 9d60ac21968f -r 929f8c01b822 lisp/info.el
--- a/lisp/info.el	Mon Jun 03 22:56:12 2002 +0000
+++ b/lisp/info.el	Mon Jun 03 22:57:40 2002 +0000
@@ -1247,10 +1247,10 @@
     (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)