# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 761511847 0
# Node ID 8c5cc76de6542a5b60150b18d63e9ff11ca7d1aa
# Parent  77cdcc5fda2d24f9244b6495360b6e27e88ff298
(mail-mailer-swallows-blank-line): Fix regexp typo.
Check for apparent header line as well as for leading whitespace.

diff -r 77cdcc5fda2d -r 8c5cc76de654 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Thu Feb 17 18:01:38 1994 +0000
+++ b/lisp/mail/sendmail.el	Thu Feb 17 19:04:07 1994 +0000
@@ -137,9 +137,9 @@
 		   (insert-file-contents "/etc/sendmail.cf")
 		   (goto-char (point-min))
 		   (let ((case-fold-search nil))
-		     (re-search-forward "^OR\>" nil t)))
+		     (re-search-forward "^OR\\>" nil t)))
 	       (kill-buffer buffer))))
-      '(looking-at " \t"))
+      '(looking-at " \t\\|[-a-zA-Z]+:"))
   "Set this non-nil if the system's mailer runs the header and body together.
 \(This problem exists on Sunos 4 when sendmail is run in remote mode.)
 The value should be an expression to test whether the problem will