From bf4cab8c0d070763e06cca1a5bf6bf3e3d35ce84 Mon Sep 17 00:00:00 2001
From: Saku Laesvuori <saku@laesvuori.fi>
Date: Sat, 19 Apr 2025 16:40:13 +0300
Subject: [PATCH] FIXUP puuttuvat match recordit

---
 .guix/modules/tiedote-md-service.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/.guix/modules/tiedote-md-service.scm b/.guix/modules/tiedote-md-service.scm
index 24c20e7..cb72f0f 100644
--- a/.guix/modules/tiedote-md-service.scm
+++ b/.guix/modules/tiedote-md-service.scm
@@ -90,7 +90,7 @@ the tiedote.md user on this system.")
 
 (define (tiedote.md-activation config)
   (match-record config <tiedote.md-configuration>
-    (state-directory)
+    (state-directory email-address sender-name sendmail-path socket-path)
     (let* ((receive-exec (list (file-append tiedote-md "/bin/tiedote.md") ; file to exec
                                (file-append tiedote-md "/bin/tiedote.md") ; arg $0
                                "--address" email-address