# HG changeset patch # User Richard M. Stallman # Date 866089949 0 # Node ID dabaf167de476fb264a7a6c35da003210a0d9e96 # Parent 37ff8dfff53b31e879392a3d787e4c794e1e02fe (mail-mode): Change paragraph-start and paragraph-separate not to match leading spaces. diff -r 37ff8dfff53b -r dabaf167de47 lisp/mail/sendmail.el --- a/lisp/mail/sendmail.el Thu Jun 12 03:51:53 1997 +0000 +++ b/lisp/mail/sendmail.el Thu Jun 12 04:32:29 1997 +0000 @@ -347,11 +347,8 @@ ;; 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 ()