2001-08-29 00:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* flow-fill.el (fill-flowed): eol might be point-max.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 714c518..921febf 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-08-29 00:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * flow-fill.el (fill-flowed): eol might be point-max.
+
 2001-08-27  Simon Josefsson  <jas@extundo.com>
 
        * nnml.el (nnml-request-update-info): Fix message.

diff --git a/lisp/flow-fill.el b/lisp/flow-fill.el
index 49105b5..1ee5bc8 100644 (file)
--- a/lisp/flow-fill.el
+++ b/lisp/flow-fill.el
@@ -95,7 +95,7 @@
          (unless sig
            (let ((fill-prefix (when quote (concat quote " "))))
              (fill-region (fill-flowed-point-at-bol)
-                          (1+ (fill-flowed-point-at-eol))
+                          (min (1+ (fill-flowed-point-at-eol)) (point-max))
                           'left 'nosqueeze))))))))
 
 (provide 'flow-fill)