Formatting improvement.

[lambdamail.git] / lambdamail.scm

diff --git a/lambdamail.scm b/lambdamail.scm
index 90c186f..07b1451 100644 (file)
--- a/lambdamail.scm
+++ b/lambdamail.scm
@@ -198,6 +198,7 @@
        (print-error-message o)
        #t)))
 
        (print-error-message o)
        #t)))
 

+

 ;; Local delivery
 
 (define (get-local-addresses config)
 ;; Local delivery
 
 (define (get-local-addresses config)


@@ -220,6 +221,7 @@
   (print "* MESSAGE DELIVERED (local)")
   #t)
 
   (print "* MESSAGE DELIVERED (local)")
   #t)
 

+

 ;; Remote delivery
 
 (define (get-domain-from-email email-string)
 ;; Remote delivery
 
 (define (get-domain-from-email email-string)


@@ -283,6 +285,7 @@
                                '(("\n" . "\r\n")))))
        (write-string processed-string #f tcp-out)))))
 
                                '(("\n" . "\r\n")))))
        (write-string processed-string #f tcp-out)))))
 

+

 ;;; Command line argument parsing
 ;;
 
 ;;; Command line argument parsing
 ;;