summaryrefslogtreecommitdiff
path: root/lisp/mail/flow-fill.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mail/flow-fill.el')
-rw-r--r--lisp/mail/flow-fill.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mail/flow-fill.el b/lisp/mail/flow-fill.el
index ed6a2df87dc..948a7d799f5 100644
--- a/lisp/mail/flow-fill.el
+++ b/lisp/mail/flow-fill.el
@@ -114,7 +114,12 @@ RFC 2646 suggests 66 characters for readability."
;;;###autoload
(defun fill-flowed (&optional buffer delete-space)
- (with-current-buffer (or (current-buffer) buffer)
+ "Apply RFC2646 decoding to BUFFER.
+If BUFFER is nil, default to the current buffer.
+
+If DELETE-SPACE, delete RFC2646 spaces padding at the end of
+lines."
+ (with-current-buffer (or buffer (current-buffer))
(goto-char (point-min))
;; Remove space stuffing.
(while (re-search-forward "^\\( \\|>+ $\\)" nil t)