diff options
| author | Richard M. Stallman | 1997-09-08 10:28:45 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-09-08 10:28:45 +0000 |
| commit | 12eb951fa57000dd62097ffd901f76880804f8b8 (patch) | |
| tree | 70da349f952f12b461706bb99bb028200bb5b244 | |
| parent | e35832ba251539c7bb883eee137097f0b27758b8 (diff) | |
| download | emacs-12eb951fa57000dd62097ffd901f76880804f8b8.tar.gz emacs-12eb951fa57000dd62097ffd901f76880804f8b8.zip | |
(mail-mode): Allow dash in citation prefixes
in adaptive-fill-regexp and adaptive-fill-first-line-regexp.
| -rw-r--r-- | lisp/mail/sendmail.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index b692f8f012c..e5f1495ca81 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -357,10 +357,10 @@ C-c C-v mail-sent-via (add a Sent-via field for each To or CC)." | |||
| 357 | (setq fill-paragraph-function 'mail-mode-fill-paragraph) | 357 | (setq fill-paragraph-function 'mail-mode-fill-paragraph) |
| 358 | (make-local-variable 'adaptive-fill-regexp) | 358 | (make-local-variable 'adaptive-fill-regexp) |
| 359 | (setq adaptive-fill-regexp | 359 | (setq adaptive-fill-regexp |
| 360 | (concat "[ \t]*[a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-regexp)) | 360 | (concat "[ \t]*[-a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-regexp)) |
| 361 | (make-local-variable 'adaptive-fill-first-line-regexp) | 361 | (make-local-variable 'adaptive-fill-first-line-regexp) |
| 362 | (setq adaptive-fill-first-line-regexp | 362 | (setq adaptive-fill-first-line-regexp |
| 363 | (concat "[ \t]*[a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-first-line-regexp)) | 363 | (concat "[ \t]*[-a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-first-line-regexp)) |
| 364 | ;; `-- ' precedes the signature. `-----' appears at the start of the | 364 | ;; `-- ' precedes the signature. `-----' appears at the start of the |
| 365 | ;; lines that delimit forwarded messages. | 365 | ;; lines that delimit forwarded messages. |
| 366 | ;; Lines containing just >= 3 dashes, perhaps after whitespace, | 366 | ;; Lines containing just >= 3 dashes, perhaps after whitespace, |