mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
services: configuration: simplify alist? procedure.
* gnu/services/configuration.scm (alist?): simplify procedure. Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
parent
a586c3996e
commit
eba81e68ac
1 changed files with 1 additions and 4 deletions
|
@ -440,10 +440,7 @@ (define list-of-strings?
|
||||||
(list-of string?))
|
(list-of string?))
|
||||||
|
|
||||||
(define alist?
|
(define alist?
|
||||||
(match-lambda
|
(list-of pair?))
|
||||||
(() #t)
|
|
||||||
((head . tail) (and (pair? head) (alist? tail)))
|
|
||||||
(_ #f)))
|
|
||||||
|
|
||||||
(define serialize-file-like empty-serializer)
|
(define serialize-file-like empty-serializer)
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue