diff options
| -rw-r--r-- | lisp/textmodes/fill.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index ed46490174d..31626ccb0e9 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el | |||
| @@ -71,10 +71,10 @@ From program, pass args FROM, TO and JUSTIFY-FLAG." | |||
| 71 | (if (eolp) (forward-line 1)) | 71 | (if (eolp) (forward-line 1)) |
| 72 | ;; If paragraph has only one line, don't assume | 72 | ;; If paragraph has only one line, don't assume |
| 73 | ;; that additional lines would have the same starting | 73 | ;; that additional lines would have the same starting |
| 74 | ;; decoration. Instead, assume they would have white space | 74 | ;; decoration. Assume no indentation. |
| 75 | ;; reaching to the same column. | 75 | ;; (re-search-forward adaptive-fill-regexp) |
| 76 | (re-search-forward adaptive-fill-regexp) | 76 | ;; (setq fill-prefix (make-string (current-column) ?\ )) |
| 77 | (setq fill-prefix (make-string (current-column) ?\ ))))) | 77 | ))) |
| 78 | 78 | ||
| 79 | (save-restriction | 79 | (save-restriction |
| 80 | (narrow-to-region from to) | 80 | (narrow-to-region from to) |