Ports may be integers and not strings

1 files changed, 4 insertions, 4 deletions

diff --git a/guix/vkraus/services/dkim-out-proxy.scm b/guix/vkraus/services/dkim-out-proxy.scm
index 999d65d..0f888b0 100644
--- a/guix/vkraus/services/dkim-out-proxy.scm
+++ b/guix/vkraus/services/dkim-out-proxy.scm
@@ -41,10 +41,10 @@
 	#~(make-forkexec-constructor
 	   (list
 	    (string-append #$dkimproxy "/bin/dkimproxy.out")
-	    (string-append "--listen=localhost:" #$input-port)
-	    (string-append "--relay=localhost:" #$output-port)
-	    (string-append "--domain=" #$domain)
-	    (string-append "--keyfile=" #$keyfile)
+	    (format #f "--listen=localhost:~a" #$input-port)
+	    (format #f "--relay=localhost:~a" #$output-port)
+	    (format #f  "--domain=~a" #$domain)
+	    (format #f "--keyfile=~a" #$keyfile)
 	    "--selector=*")))
        (stop #~(make-kill-destructor)))))))