changeset 18227:dabaf167de47

(mail-mode): Change paragraph-start and paragraph-separate not to match leading spaces.
author Richard M. Stallman <rms@gnu.org>
date Thu, 12 Jun 1997 04:32:29 +0000
parents 37ff8dfff53b
children 81fa1f5547eb
files lisp/mail/sendmail.el
diffstat 1 files changed, 2 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- 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 ()