From 5a85300527c0f1dce554683201de59acbcdfacde Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 17 Feb 1994 19:04:07 +0000 Subject: [PATCH] (mail-mailer-swallows-blank-line): Fix regexp typo. Check for apparent header line as well as for leading whitespace. --- lisp/mail/sendmail.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 4325ce4950f..e0fa000fef4 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -137,9 +137,9 @@ so you can edit or delete these lines.") (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 -- 2.39.5