X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=lambdamail.git;a=blobdiff_plain;f=lambdamail.scm;h=5e714d7e7c818f7decaac6e1b98e22d4b2e17b65;hp=e4956d8bd5d0d00e8bf183fa71841766752b4aed;hb=ade72e4b9775b2d4c31f2cd4f280f6905844ca75;hpb=5c769132c51dbe2812d70db4566e5880f80a82e7

diff --git a/lambdamail.scm b/lambdamail.scm
index e4956d8..5e714d7 100644
--- a/lambdamail.scm
+++ b/lambdamail.scm
@@ -36,7 +36,7 @@
   (server-loop listener config))
 
 (define (smtp-reply reply out-port)
-  (write-line reply out-port))
+  (write-line (conc reply "\r") out-port))
 
 (define (smtp-greeting out-port)
   (smtp-reply (conc "220 thelambdalab.xyz LambdaMail v" lambdamail-version) out-port))