diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/help-fns.el | 2 |
2 files changed, 4 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0ff9aef089b..157e03282c4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2005-03-31 Thien-Thi Nguyen <ttn@gnu.org> | ||
| 2 | |||
| 3 | * help-fns.el (help-with-tutorial): Revert last change. | ||
| 4 | |||
| 1 | 2005-03-31 Kim F. Storm <storm@cua.dk> | 5 | 2005-03-31 Kim F. Storm <storm@cua.dk> |
| 2 | 6 | ||
| 3 | * emulation/cua-base.el (cua-scroll-down): Add CUA property. | 7 | * emulation/cua-base.el (cua-scroll-down): Add CUA property. |
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 9231f959c64..4bf0a4775a0 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el | |||
| @@ -65,8 +65,6 @@ 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))) | ||
| 70 | (search-forward "\n<<") | 68 | (search-forward "\n<<") |
| 71 | (beginning-of-line) | 69 | (beginning-of-line) |
| 72 | ;; Convert the <<...>> line to the proper [...] line, | 70 | ;; Convert the <<...>> line to the proper [...] line, |