From 49c20b038ec1563092ec6ab7b88d42919307339a Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Wed, 2 Dec 2009 19:47:33 +0100 Subject: send-mail: Communicate success to the client as appropriate. --- src/logikorr/servlet.clj | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/logikorr/servlet.clj b/src/logikorr/servlet.clj index ae83845..3178cec 100644 --- a/src/logikorr/servlet.clj +++ b/src/logikorr/servlet.clj @@ -228,7 +228,8 @@ Logikorr"))) ;; ())) (.setFileName "logik.txt") (.setDisposition "attachment")))))) - (Transport/send message))) + (Transport/send message) + "\"OK\"")) (defmacro with-authentication [& body] `(call-with-authentication (fn [] ~@body))) -- cgit v1.2.3