path: root/gnu/packages/code.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/code.scm')
0 files changed, 0 insertions, 0 deletions
generated by cgit
services) #:use-module (gnu home services) #:use-module (guix diagnostics) #:use-module (srfi srfi-1) #:use-module (srfi srfi-64) #:use-module (ice-9 match)) (test-begin "home-services") (test-assert "fold-home-service-types" (match (fold-home-service-types cons '()) (() #f) (lst (and (every service-type? lst) (every (lambda (type) (let ((location (service-type-location type))) (string-contains (location-file location) "gnu/home"))) lst))))) (test-eq "lookup-service-types" home-files-service-type (and (null? (lookup-home-service-types 'does-not-exist-at-all)) (match (lookup-home-service-types 'home-files) ((one) one) (x x)))) (test-end)
generated by cgit