summaryrefslogtreecommitdiff
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2007-10-18 13:24:15 +0000
committerJuanma Barranquero <lekktu@gmail.com>2007-10-18 13:24:15 +0000
commitfe1e44b34ae38b001ceb31a68838432b9c48a79e (patch)
tree9a60745cb8d2e2455efcad9f408387e10c739db2 /lisp/textmodes
parentf3e8c790753b1bfb64987e4e5e607f3cf539adeb (diff)
downloademacs-fe1e44b34ae38b001ceb31a68838432b9c48a79e.tar.gz
(fill-individual-paragraphs): Doc fix.
(adaptive-fill-function): Doc fix. Remove * from docstring.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/fill.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index cf52793f7b5..ad42845eb53 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -117,8 +117,8 @@ if it would act as a paragraph-starter on the second line."
:group 'fill)
(defcustom adaptive-fill-function nil
- "*Function to call to choose a fill prefix for a paragraph, or nil.
-nil means the function has not determined the fill prefix."
+ "Function to call to choose a fill prefix for a paragraph, or nil.
+A nil value means the function has not determined the fill prefix."
:type '(choice (const nil) function)
:group 'fill)
@@ -1359,7 +1359,7 @@ These lines are filled together.
When calling from a program, pass the range to fill
as the first two arguments.
-Optional third and fourth arguments JUSTIFY and MAIL-FLAG:
+Optional third and fourth arguments JUSTIFY and CITATION-REGEXP:
JUSTIFY to justify paragraphs (prefix arg),
When filling a mail message, pass a regexp for CITATION-REGEXP
which will match the prefix of a line which is a citation marker
@@ -1448,6 +1448,7 @@ Also, if CITATION-REGEXP is non-nil, don't fill header lines."
(fill-region-as-paragraph start (point) justify)
(if (and (bolp) (not had-newline))
(delete-char -1))))))))
+
(defun fill-individual-paragraphs-prefix (citation-regexp)
(let* ((adaptive-fill-first-line-regexp ".*")
(just-one-line-prefix