500 |
(make-local-variable 'adaptive-fill-first-line-regexp) |
(make-local-variable 'adaptive-fill-first-line-regexp) |
501 |
(setq adaptive-fill-first-line-regexp |
(setq adaptive-fill-first-line-regexp |
502 |
(concat adaptive-fill-first-line-regexp |
(concat adaptive-fill-first-line-regexp |
503 |
"\\|[ \t]*[-[:alnum:]]+>+[ \t]*")) |
"\\|[ \t]*[-[:alnum:]]*>+[ \t]*")) |
504 |
;; `-- ' precedes the signature. `-----' appears at the start of the |
;; `-- ' precedes the signature. `-----' appears at the start of the |
505 |
;; lines that delimit forwarded messages. |
;; lines that delimit forwarded messages. |
506 |
;; Lines containing just >= 3 dashes, perhaps after whitespace, |
;; Lines containing just >= 3 dashes, perhaps after whitespace, |