diff options
| author | Richard M. Stallman | 1994-07-15 04:31:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-07-15 04:31:14 +0000 |
| commit | 47c5e807f2ce02d0c29a56a3c28e8605d64b6eec (patch) | |
| tree | 20e02900f9cfc6b899d8f142a8d8a1db7a7c30ed | |
| parent | cd754bf5472509f190f2ab8f311f2110444443d8 (diff) | |
| download | emacs-47c5e807f2ce02d0c29a56a3c28e8605d64b6eec.tar.gz emacs-47c5e807f2ce02d0c29a56a3c28e8605d64b6eec.zip | |
(mail-mailer-swallows-blank-line): Verify sendmail.cf
exists before reading it.
| -rw-r--r-- | lisp/mail/sendmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 58c5f298fa9..3244d1cd103 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -130,7 +130,7 @@ so you can edit or delete these lines.") | |||
| 130 | ;; options -t, and -v if not interactive. | 130 | ;; options -t, and -v if not interactive. |
| 131 | (defvar mail-mailer-swallows-blank-line | 131 | (defvar mail-mailer-swallows-blank-line |
| 132 | (if (and (string-match "sparc-sun-sunos\\(\\'\\|[^5]\\)" system-configuration) | 132 | (if (and (string-match "sparc-sun-sunos\\(\\'\\|[^5]\\)" system-configuration) |
| 133 | (file-exists-p "/etc/sendmail.cf") | 133 | (file-readable-p "/etc/sendmail.cf") |
| 134 | (let ((buffer (get-buffer-create " *temp*"))) | 134 | (let ((buffer (get-buffer-create " *temp*"))) |
| 135 | (unwind-protect | 135 | (unwind-protect |
| 136 | (save-excursion | 136 | (save-excursion |