~ruther/guix-local

eba81e68acbb989bcd1c1c22d2fe2c808724bb21 — Bruno Victal 3 years ago a586c39
services: configuration: simplify alist? procedure.

* gnu/services/configuration.scm (alist?): simplify procedure.

Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
1 files changed, 1 insertions(+), 4 deletions(-)

M gnu/services/configuration.scm
M gnu/services/configuration.scm => gnu/services/configuration.scm +1 -4
@@ 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)