1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-09 15:50:21 +00:00

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

This commit is contained in:
Richard M. Stallman 2002-06-03 22:57:40 +00:00
parent 09f90d2ca8
commit f4e81d49d4

View File

@ -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)