diff options
| -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 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.") | |||
| 137 | (insert-file-contents "/etc/sendmail.cf") | 137 | (insert-file-contents "/etc/sendmail.cf") |
| 138 | (goto-char (point-min)) | 138 | (goto-char (point-min)) |
| 139 | (let ((case-fold-search nil)) | 139 | (let ((case-fold-search nil)) |
| 140 | (re-search-forward "^OR\>" nil t))) | 140 | (re-search-forward "^OR\\>" nil t))) |
| 141 | (kill-buffer buffer)))) | 141 | (kill-buffer buffer)))) |
| 142 | '(looking-at " \t")) | 142 | '(looking-at " \t\\|[-a-zA-Z]+:")) |
| 143 | "Set this non-nil if the system's mailer runs the header and body together. | 143 | "Set this non-nil if the system's mailer runs the header and body together. |
| 144 | \(This problem exists on Sunos 4 when sendmail is run in remote mode.) | 144 | \(This problem exists on Sunos 4 when sendmail is run in remote mode.) |
| 145 | The value should be an expression to test whether the problem will | 145 | The value should be an expression to test whether the problem will |