(mail-mode): Change paragraph-start and

paragraph-separate not to match leading spaces.

(mail-mode): Change paragraph-start and
paragraph-separate not to match leading spaces.
a9842346 · Richard M. Stallman · 5acc847d · a9842346
Commit a9842346 authored Jun 12, 1997 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 5 deletions

lisp/mail/sendmail.el lisp/mail/sendmail.el +2 -5

No files found.
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -347,11 +347,8 @@ C-c C-v  mail-sent-via (add a Sent-via field for each To or CC)."
  ;; Lines containing just >= 3 dashes, perhaps after whitespace,
  ;; are also sometimes used and should be separators.
  (setq paragraph-start (concat (regexp-quote mail-header-separator)
-				"$\\|[ \t]*[-_][-_][-_]+$\\|-- $\\|-----\\|"
-				paragraph-start))
-  (setq paragraph-separate (concat (regexp-quote mail-header-separator)
-				   "$\\|[ \t]*[-_][-_][-_]+$\\|-- $\\|-----\\|"
-				   paragraph-separate))
+				"\\|$\\|" page-delimiter))
+  (setq paragraph-separate paragraph-start)
  (run-hooks 'text-mode-hook 'mail-mode-hook))

 (defun mail-mode-auto-fill ()