X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=lambdamail.git;a=blobdiff_plain;f=lambdamail.scm;fp=lambdamail.scm;h=bcd7a7e9da343629f8e0545c8d3217898fc0820f;hp=92bbd123e960ca5d3f9d0659d0f24514c8682d6f;hb=c86d9ff9b19f1e88eed83a73704bb210f77d58de;hpb=d03e984c3044186567f5b865d33e5a7284308d7b diff --git a/lambdamail.scm b/lambdamail.scm index 92bbd12..bcd7a7e 100644 --- a/lambdamail.scm +++ b/lambdamail.scm @@ -177,7 +177,7 @@ (cond (dest (let ((dest-dir (cadr dest))) - (deliver-message-local msg dest-file)) + (deliver-message-local msg dest-dir)) (print "Message DELIVERED (local):")) (orig (let ((password (caddr orig)))