From 80d9edb69d6e980501963fbae9c05e0c024295fe Mon Sep 17 00:00:00 2001 From: muradm Date: Mon, 29 Aug 2022 16:51:18 +0300 Subject: gnu: fail2ban-service-type: Fix field name serialization. * gnu/services/security.scm: Wrong condition in string-filter function in fail2ban-jail-configuration-serialize-field-name. Signed-off-by: Maxim Cournoyer --- gnu/services/security.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gnu/services') diff --git a/gnu/services/security.scm b/gnu/services/security.scm index 1e0360c07f..9ab23ffb46 100644 --- a/gnu/services/security.scm +++ b/gnu/services/security.scm @@ -127,7 +127,7 @@ (string-append "bantime." (substring name 9)))) ((string-contains name "-") (fail2ban-jail-configuration-serialize-field-name - (string-filter (lambda (c) (equal? c #\-)) name))) + (string-filter (lambda (c) (not (equal? c #\-))) name))) (else name))) (define (fail2ban-jail-configuration-serialize-string field-name value) -- cgit v1.2.3