diff options
| author | Richard M. Stallman <[email protected]> | 1994-02-17 19:04:07 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1994-02-17 19:04:07 +0000 |
| commit | 5a85300527c0f1dce554683201de59acbcdfacde (patch) | |
| tree | 2fa3538d3f9fdd94931f3af79233ef315c93d2ac | |
| parent | 14c90d01c58a8c5e25cc0ea9830cf60695246850 (diff) | |
(mail-mailer-swallows-blank-line): Fix regexp typo.
Check for apparent header line as well as for leading whitespace.
| -rw-r--r-- | lisp/mail/sendmail.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 4325ce4950..e0fa000fef 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 |