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

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 4bf0a4775a083f65798352345fb3a40ca833d655..9231f959c644c674d548844224246ee30af42f42 100644 (file)
--- 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,