(smtpmail-send-it): Use `binary-write-region' instead of

`write-region-as-binary'.

diff --git a/smtpmail.el b/smtpmail.el
index 460dbba..f3be888 100644 (file)
--- a/smtpmail.el
+++ b/smtpmail.el
@@ -245,7 +245,7 @@ This is relative to `smtpmail-queue-dir'.")
                (insert-buffer tembuf)
                (or (file-directory-p smtpmail-queue-dir)
                    (make-directory smtpmail-queue-dir t))
-               (write-region-as-binary (point-min) (point-max) file-data)
+               (binary-write-region (point-min) (point-max) file-data)
                (set-buffer buffer-elisp)
                (erase-buffer)
                (insert (concat