diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-05-18 23:51:55 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-05-18 23:51:55 -0400 |
| commit | ab0c07c0209012ff0010c2c24303ee7a4c33a514 (patch) | |
| tree | 267f81ca318782abc9012bf9edb175d78babea0a /lisp | |
| parent | 29031d52feb109fa43ad08c4451713face97eb85 (diff) | |
| download | emacs-ab0c07c0209012ff0010c2c24303ee7a4c33a514.tar.gz emacs-ab0c07c0209012ff0010c2c24303ee7a4c33a514.tar.bz2 emacs-ab0c07c0209012ff0010c2c24303ee7a4c33a514.zip | |
* textmodes/fill.el (fill-region): Don't fill past the end.
Fixes: debbugs:6201
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/textmodes/fill.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1da680a68f9..3346fcf497a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2010-05-19 Uday S Reddy <u.s.reddy@cs.bham.ac.uk> (tiny change) + + * textmodes/fill.el (fill-region): Don't fill past the end (bug#6201). + 2010-05-18 Stefan Monnier <monnier@iro.umontreal.ca> * subr.el (read-quoted-char): Resolve modifiers after key 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)))) |