From f3019a9f4a7d1479d0f46cd61c24125acc277e3d Mon Sep 17 00:00:00 2001 From: okada Date: Thu, 21 Sep 2000 01:45:23 +0000 Subject: [PATCH] 2000-09-21 Kenichi OKADA * smtp.el (smtp-via-smtp): Cause an error if `smtp-notify-success' is not available. 2000-09-18 KUSANO Takayuki * smtp.el (smtp-via-smtp): Check `service extensions' for DSN. --- ChangeLog | 15 +++++++++++++++ SLIM-VERSION | 3 ++- mime-def.el | 2 +- smtp.el | 5 ++++- 4 files changed, 22 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 9a69f89..e984f2e 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,18 @@ +2000-09-21 Kenichi OKADA + + * smtp.el (smtp-via-smtp): Cause an error if `smtp-notify-success' + is not available. + +2000-09-18 KUSANO Takayuki + + * smtp.el (smtp-via-smtp): Check `service extensions' for DSN. + +2000-09-21 Kenichi OKADA + + * mime-def.el (mime-library-product): Up. + * SLIM-VERSION: Up. + + 2000-09-16 Kenichi OKADA * SLIM: Version 1.14.2 released. diff --git a/SLIM-VERSION b/SLIM-VERSION index 7e4eb26..6b1b20f 100644 --- a/SLIM-VERSION +++ b/SLIM-VERSION @@ -12,4 +12,5 @@ 1.14.0 安倍なつみ 1.14.1 松田純 1.14.2 加護亜依 - +l.14.3 篠原ともえ +1.14.4 ?? diff --git a/mime-def.el b/mime-def.el index fdc2e03..3ed216a 100644 --- a/mime-def.el +++ b/mime-def.el @@ -36,7 +36,7 @@ ) (eval-and-compile - (defconst mime-library-product ["SLIM" (1 14 2) "加護亜依"] + (defconst mime-library-product ["SLIM" (1 14 3) "篠原ともえ"] "Product name, version number and code name of MIME-library package.")) (defmacro mime-product-name (product) diff --git a/smtp.el b/smtp.el index 903671b..6be6927 100644 --- a/smtp.el +++ b/smtp.el @@ -290,7 +290,10 @@ don't define this value." (smtp-send-command process (format (if smtp-notify-success - "RCPT TO:<%s> NOTIFY=SUCCESS" + (if (memq 'dsn extensions) + "RCPT TO:<%s> NOTIFY=SUCCESS" + (throw 'done + (format "Delivery Status Notifications is not available"))) "RCPT TO:<%s>") (car recipients))) (setq recipients (cdr recipients)) -- 1.7.10.4