12/13: services: messaging: Fix two copy-paste mistakes; avoid warnings.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 9ef6d80ef4a2c61f1307ca1ba072a77c8e294e9d
Author: Attila Lendvai <attila@lendvai.name>
AuthorDate: Fri Apr 1 21:19:28 2022 +0200

    services: messaging: Fix two copy-paste mistakes; avoid warnings.
    
    * gnu/services/messaging.scm (file-name-list, file-object-list): Fix
    name in 'define-maybe' instances.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 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 @@
   (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 @@
   (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)))