From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Wed, 30 Mar 2005 15:44:40 +0000 (+0000)
Subject: (help-with-tutorial): Delete title line.
X-Git-Tag: ttn-vms-21-2-B4~1351
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c48d7fa0abfb0b7272c8f1077bc0e81e67ca08a2;p=emacs.git

(help-with-tutorial): Delete title line.
---

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."
       (insert-file-contents (expand-file-name filename data-directory))
       (hack-local-variables)
       (goto-char (point-min))
+      ;; The first line conventionally contains the title.
+      (delete-region (point) (progn (forward-line 1) (point)))
       (search-forward "\n<<")
       (beginning-of-line)
       ;; Convert the <<...>> line to the proper [...] line,