* smtp.el (smtp-send-by-myself): Fix.

diff --git a/ChangeLog b/ChangeLog
index 87c9ecf..744d28a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2001-11-18  Kenichi OKADA  <okada@opaopa.org>
 
+       * smtp.el (smtp-send-by-myself): Fix.
+
+2001-11-18  Kenichi OKADA  <okada@opaopa.org>
+
        * smtp.el (smtp-send-by-myself): New variable.
        (smtp-use-starttls-ignore-error): New variable.
        (smtp-find-mx): New function.

diff --git a/smtp.el b/smtp.el
index cda4656..9c4fcba 100644 (file)
--- a/smtp.el
+++ b/smtp.el
@@ -383,6 +383,10 @@ BUFFER may be a buffer or a buffer name which contains mail message."
     (while (car servers)
       (setq server (caar servers))
       (setq recipients (cdar servers))
+      (if (not (and server recipients))
+         ;; MAILER-DAEMON is required. :)
+         (error (format "Cannot send <%s>"
+                        (mapconcat 'concat recipients ">,<"))))
       (setq package
            (smtp-make-package sender recipients buffer))
       (save-excursion