Commit d5a92c06 authored by Richard M. Stallman's avatar Richard M. Stallman

*** empty log message ***

parent 4c2232bc
...@@ -71,10 +71,10 @@ From program, pass args FROM, TO and JUSTIFY-FLAG." ...@@ -71,10 +71,10 @@ From program, pass args FROM, TO and JUSTIFY-FLAG."
(if (eolp) (forward-line 1)) (if (eolp) (forward-line 1))
;; If paragraph has only one line, don't assume ;; If paragraph has only one line, don't assume
;; that additional lines would have the same starting ;; that additional lines would have the same starting
;; decoration. Instead, assume they would have white space ;; decoration. Assume no indentation.
;; reaching to the same column. ;; (re-search-forward adaptive-fill-regexp)
(re-search-forward adaptive-fill-regexp) ;; (setq fill-prefix (make-string (current-column) ?\ ))
(setq fill-prefix (make-string (current-column) ?\ ))))) )))
(save-restriction (save-restriction
(narrow-to-region from to) (narrow-to-region from to)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment