diff options
| -rw-r--r-- | lisp/add-log.el | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index 0f4cc97347b..0348c0bd4b6 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -1,6 +1,6 @@ ;;; add-log.el --- change log maintenance commands for Emacs -;; Copyright (C) 1985, 86, 87, 88, 89, 90, 91, 1992 +;; Copyright (C) 1985, 86, 87, 88, 89, 90, 91, 1992, 1993 ;; Free Software Foundation, Inc. ;; This file is part of GNU Emacs. @@ -112,14 +112,10 @@ Third arg OTHER-WINDOW non-nil means visit in other window." " " full-name " (" login-name "@" site-name ")\n\n")) - ;; Search only within the first paragraph of the first page. + ;; Search only within the first paragraph. (forward-paragraph 1) (setq paragraph-end (point)) (goto-char (point-min)) - (forward-page 1) - (if (< (point) paragraph-end) - (setq paragraph-end (point))) - (goto-char (point-min)) ;; Now insert the new line for this entry. (cond ((re-search-forward "^\\s *\\*\\s *$" paragraph-end t) |