summaryrefslogtreecommitdiff
path: root/lisp/textmodes/fill.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2010-05-18 23:51:55 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2010-05-18 23:51:55 -0400
commitab0c07c0209012ff0010c2c24303ee7a4c33a514 (patch)
tree267f81ca318782abc9012bf9edb175d78babea0a /lisp/textmodes/fill.el
parent29031d52feb109fa43ad08c4451713face97eb85 (diff)
downloademacs-ab0c07c0209012ff0010c2c24303ee7a4c33a514.tar.gz
* textmodes/fill.el (fill-region): Don't fill past the end.
Fixes: debbugs:6201
Diffstat (limited to 'lisp/textmodes/fill.el')
-rw-r--r--lisp/textmodes/fill.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 1b3cc8dc4d8..da6e02bfa2f 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -1036,7 +1036,7 @@ space does not end a sentence, so don't break a line there."
(fill-forward-paragraph -1))
(if (< (point) beg)
(goto-char beg))
- (if (>= (point) initial)
+ (if (and (>= (point) initial) (< (point) end))
(setq fill-pfx
(fill-region-as-paragraph (point) end justify nosqueeze))
(goto-char end))))