Removed test code.

diff --git a/lambdamail.scm b/lambdamail.scm
index a5c9b3e..a2fd01d 100644 (file)
--- a/lambdamail.scm
+++ b/lambdamail.scm
@@ -358,9 +358,9 @@
                       (config-spool-dir-set! config (cadr rest-args))))
                   (run-server config))))))))
 
                       (config-spool-dir-set! config (cadr rest-args))))
                   (run-server config))))))))
 

-;; (main)
+(main)

 
 

-(define (test)
-  (run-server (make-config "localhost" 2525 "spool" '() '())))
+;; (define (test)
+;;   (run-server (make-config "localhost" 2525 "spool" '() '())))

 
 ;; (test)
 
 ;; (test)