diff options
| author | Richard M. Stallman | 2002-06-03 22:57:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-06-03 22:57:40 +0000 |
| commit | f4e81d49d4a24197176d95ccc629024b8be9d1e4 (patch) | |
| tree | f1af9e140858c136dbb2a8d8982e2eb9a4c34bda | |
| parent | 09f90d2ca8e34f8e7e091fcb1cbb50fe8a8efbe7 (diff) | |
| download | emacs-f4e81d49d4a24197176d95ccc629024b8be9d1e4.tar.gz emacs-f4e81d49d4a24197176d95ccc629024b8be9d1e4.zip | |
(Info-extract-pointer): Ignore Info-header-line.
| -rw-r--r-- | lisp/info.el | 8 |
1 files changed, 4 insertions, 4 deletions
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." | |||
| 1247 | (save-excursion | 1247 | (save-excursion |
| 1248 | (save-restriction | 1248 | (save-restriction |
| 1249 | (goto-char (point-min)) | 1249 | (goto-char (point-min)) |
| 1250 | (when Info-header-line | 1250 | ;;; (when Info-header-line |
| 1251 | ;; expose the header line in the buffer | 1251 | ;;; ;; expose the header line in the buffer |
| 1252 | (widen) | 1252 | ;;; (widen) |
| 1253 | (forward-line -1)) | 1253 | ;;; (forward-line -1)) |
| 1254 | (let ((bound (point))) | 1254 | (let ((bound (point))) |
| 1255 | (forward-line 1) | 1255 | (forward-line 1) |
| 1256 | (cond ((re-search-backward (concat name ":") bound t) | 1256 | (cond ((re-search-backward (concat name ":") bound t) |