Commit 63ed0aa0 authored by Roland McGrath's avatar Roland McGrath
Browse files

(add-change-log-entry): Restrict PARAGRAPH-END to being on the first

page.
parent c7e69876
......@@ -112,10 +112,14 @@ 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.
;; Search only within the first paragraph of the first page.
(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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment