summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guile/email-key-rotation.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/guile/email-key-rotation.scm b/guile/email-key-rotation.scm
index 2c5d5f6..6810cf9 100644
--- a/guile/email-key-rotation.scm
+++ b/guile/email-key-rotation.scm
@@ -38,7 +38,7 @@
(define (G_ msg) (gettext msg "email-key-rotation"))
(define-immutable-record-type <configuration>
- (make-configuration dkim-state srs-state private-opensmtpd-config-file dkim-current-selector-file dkim-current-key-file gandi-configuration)
+ (make-configuration/uninitialized dkim-state srs-state private-opensmtpd-config-file dkim-current-selector-file dkim-current-key-file gandi-configuration)
configuration?
(dkim-state dkim-state set-dkim-state)
(srs-state srs-state set-srs-state)
@@ -47,6 +47,10 @@
(dkim-current-key-file dkim-current-key-file set-dkim-current-key-file)
(gandi-configuration gandi-configuration set-gandi-configuration))
+(define (make-configuration . args)
+ (bindtextdomain "email-key-rotation" "/usr/local/share/locale")
+ (apply make-configuration/uninitialized args))
+
(define (refine-configuration/one subtree config)
(sxml-match
subtree