#:use-module (srfi srfi-26)
#:use-module (ice-9 match)
#:export (dicod-service
+ dicod-service-type
dicod-configuration
dicod-database
%dicod-database:gcide))
(group "dicod")
(system? #t)
(home-directory "/var/empty")
- (shell #~(string-append #$shadow "/sbin/nologin")))))
+ (shell (file-append shadow "/sbin/nologin")))))
(define (dicod-configuration-file config)
(define database->text