(log-edit-changelog-paragraph): Return point-max as the end of the

ChangeLog paragraph when it ends without a line termination.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0e6c32986381674b4837fbf286905b519c9f9065..c6675a06b9babd0a3090e1801f2ee54ec00f1161 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2007-05-27  Tetsurou Okazaki  <okazaki@be.to>  (tiny change)
+
+       * log-edit.el (log-edit-changelog-paragraph): Return point-max
+       as the end of the ChangeLog paragraph when it ends without a line
+       termination.
+
 2007-05-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * textmodes/fill.el (canonically-space-region): Make the second arg

diff --git a/lisp/log-edit.el b/lisp/log-edit.el
index ed0a5c464e9978022a0f048b461cc98176588458..8f63635ee49c00068fdb268f26d8130cb7862849 100644 (file)
--- a/lisp/log-edit.el
+++ b/lisp/log-edit.el
@@ -538,7 +538,7 @@ If we are between paragraphs, return the previous paragraph."
             (point))
           (if (re-search-forward "^[ \t\n]*$" nil t)
               (match-beginning 0)
-            (point)))))
+            (point-max)))))
 
 (defun log-edit-changelog-subparagraph ()
   "Return the bounds of the ChangeLog subparagraph containing point.