Mercurial > emacs
changeset 85400:62d330e3a0a8
(fill-individual-paragraphs): Doc fix.
(adaptive-fill-function): Doc fix. Remove * from docstring.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Thu, 18 Oct 2007 13:24:15 +0000 |
parents | f887e22f9f21 |
children | 7da69baf5fc9 |
files | lisp/textmodes/fill.el |
diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/fill.el Thu Oct 18 04:53:10 2007 +0000 +++ b/lisp/textmodes/fill.el Thu Oct 18 13:24:15 2007 +0000 @@ -117,8 +117,8 @@ :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 @@ 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 @@ (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