diff options
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/fill.el | 4 | ||||
| -rw-r--r-- | lisp/textmodes/flyspell.el | 8 |
2 files changed, 5 insertions, 7 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 9da8519d12d..59588d20bfd 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -753,7 +753,9 @@ space does not end a sentence, so don't break a line there." (fill-paragraph arg))) (defun fill-paragraph (arg) - "Fill paragraph at or after point. Prefix ARG means justify as well. + "Fill paragraph at or after point. + +If ARG is non-nil (interactively, with prefix argument), justify as well. If `sentence-end-double-space' is non-nil, then period followed by one space does not end a sentence, so don't break a line there. the variable `fill-column' controls the width for filling. diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 185f2e8dea3..a509fdf7f6c 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el @@ -1961,12 +1961,8 @@ Sets `flyspell-auto-correct-previous-pos' to nil" But don't look beyond what's visible on the screen." (interactive "d") - (let (top bot) - (save-excursion - (move-to-window-line 0) - (setq top (point)) - (move-to-window-line -1) - (setq bot (point))) + (let ((top (window-start)) + (bot (window-end))) (save-excursion (save-restriction (narrow-to-region top bot) |