diff options
| author | Thien-Thi Nguyen | 2005-03-30 15:44:40 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen | 2005-03-30 15:44:40 +0000 |
| commit | c48d7fa0abfb0b7272c8f1077bc0e81e67ca08a2 (patch) | |
| tree | 091b72b37c77ef163492e0e59cf40aaf4faaa099 | |
| parent | 30439bfa93253a70d44bdc231e3f1e200e754dc3 (diff) | |
| download | emacs-c48d7fa0abfb0b7272c8f1077bc0e81e67ca08a2.tar.gz emacs-c48d7fa0abfb0b7272c8f1077bc0e81e67ca08a2.zip | |
(help-with-tutorial): Delete title line.
| -rw-r--r-- | lisp/help-fns.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 4bf0a4775a0..9231f959c64 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el | |||
| @@ -65,6 +65,8 @@ With ARG, you are asked to choose which language." | |||
| 65 | (insert-file-contents (expand-file-name filename data-directory)) | 65 | (insert-file-contents (expand-file-name filename data-directory)) |
| 66 | (hack-local-variables) | 66 | (hack-local-variables) |
| 67 | (goto-char (point-min)) | 67 | (goto-char (point-min)) |
| 68 | ;; The first line conventionally contains the title. | ||
| 69 | (delete-region (point) (progn (forward-line 1) (point))) | ||
| 68 | (search-forward "\n<<") | 70 | (search-forward "\n<<") |
| 69 | (beginning-of-line) | 71 | (beginning-of-line) |
| 70 | ;; Convert the <<...>> line to the proper [...] line, | 72 | ;; Convert the <<...>> line to the proper [...] line, |