guix-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[bug#54673] [PATCH] services: messaging: Fix two copy-paste mistakes; av


From: Attila Lendvai
Subject: [bug#54673] [PATCH] services: messaging: Fix two copy-paste mistakes; avoid warnings.
Date: Fri, 1 Apr 2022 21:19:28 +0200

---
 gnu/services/messaging.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gnu/services/messaging.scm b/gnu/services/messaging.scm
index 6ed55453db..4bceb1d37a 100644
--- a/gnu/services/messaging.scm
+++ b/gnu/services/messaging.scm
@@ -180,7 +180,7 @@ (define (file-name-list? val)
   (and (list? val) (and-map file-name? val)))
 (define (serialize-file-name-list field-name val)
   (serialize-string-list field-name val))
-(define-maybe file-name)
+(define-maybe file-name-list)
 
 (define (file-object? val)
   (or (file-like? val) (file-name? val)))
@@ -192,7 +192,7 @@ (define (file-object-list? val)
   (and (list? val) (and-map file-object? val)))
 (define (serialize-file-object-list field-name val)
   (serialize-string-list field-name val))
-(define-maybe file-object)
+(define-maybe file-object-list)
 
 (define (raw-content? val)
   (not (eq? val 'disabled)))
-- 
2.34.0






reply via email to

[Prev in Thread] Current Thread [Next in Thread]