[Emacs-diffs] Changes to emacs/lisp/textmodes/fill.el

[Stefan Monnier]

Index: emacs/lisp/textmodes/fill.el
diff -c emacs/lisp/textmodes/fill.el:1.161 emacs/lisp/textmodes/fill.el:1.162
*** emacs/lisp/textmodes/fill.el:1.161  Fri Apr  4 16:43:12 2003
--- emacs/lisp/textmodes/fill.el        Mon Apr 21 12:22:08 2003
***************
*** 660,668 ****
        (let (linebeg)
          (while (< (point) to)
            (setq linebeg (point))
!           (move-to-column (1+ (current-fill-column)))
            (if (when (< (point) to)
                  ;; Find the position where we'll break the line.
                  (fill-move-to-break-point linebeg)
                  ;; Check again to see if we got to the end of
                  ;; the paragraph.
--- 660,669 ----
        (let (linebeg)
          (while (< (point) to)
            (setq linebeg (point))
!           (move-to-column (current-fill-column))
            (if (when (< (point) to)
                  ;; Find the position where we'll break the line.
+                 (forward-char 1) ;Use an immediately following space, if any.
                  (fill-move-to-break-point linebeg)
                  ;; Check again to see if we got to the end of
                  ;; the paragraph.