From 6fe8e9debedd29b6ca9f3352eb5d3aff6d8ace0a Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Wed, 29 Aug 2001 07:13:25 +0000 Subject: [PATCH] 2001-08-29 00:00:00 ShengHuo ZHU * flow-fill.el (fill-flowed): eol might be point-max. --- lisp/ChangeLog | 4 ++++ lisp/flow-fill.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 714c51815..921febfd3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-08-29 00:00:00 ShengHuo ZHU + + * flow-fill.el (fill-flowed): eol might be point-max. + 2001-08-27 Simon Josefsson * nnml.el (nnml-request-update-info): Fix message. diff --git a/lisp/flow-fill.el b/lisp/flow-fill.el index 49105b536..1ee5bc863 100644 --- 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) -- 2.34.1