Subject: [bug#54673] [PATCH] services: messaging: Fix two copy-paste mistakes; avoid warnings.

From: Attila Lendvai <[email-masked]>
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