diff options
| author | Vivien Kraus <vivien@planete-kraus.eu> | 2024-02-16 22:29:42 +0100 |
|---|---|---|
| committer | Vivien Kraus <vivien@planete-kraus.eu> | 2024-02-16 22:36:13 +0100 |
| commit | c9cd2319ceaa349cfb2fb62bcbe6463ef32831bb (patch) | |
| tree | c992d24c363a6478774a2a6deaf8320a91fbae39 | |
| parent | 78114f3f30f292aca7954ceab410f8ec59a44bcc (diff) | |
Call bindtextdomain at initialization time.
| -rw-r--r-- | guile/email-key-rotation.scm | 6 |
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 |