From eba81e68acbb989bcd1c1c22d2fe2c808724bb21 Mon Sep 17 00:00:00 2001 From: Bruno Victal Date: Wed, 25 Jan 2023 16:38:51 +0000 Subject: services: configuration: simplify alist? procedure. * gnu/services/configuration.scm (alist?): simplify procedure. Signed-off-by: Maxim Cournoyer --- gnu/services/configuration.scm | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'gnu') diff --git a/gnu/services/configuration.scm b/gnu/services/configuration.scm index 02d1aa1796..174c2f20d2 100644 --- a/gnu/services/configuration.scm +++ b/gnu/services/configuration.scm @@ -440,10 +440,7 @@ the list result in @code{#t} when applying PRED? on them." (list-of string?)) (define alist? - (match-lambda - (() #t) - ((head . tail) (and (pair? head) (alist? tail))) - (_ #f))) + (list-of pair?)) (define serialize-file-like empty-serializer) -- cgit v1.2.3