From 56a93cb975ddc33d50183fb122e2aafda026f18e Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Mon, 4 Mar 2019 13:34:43 +0100 Subject: services: Use 'file-append' for user account shells. * gnu/services/cuirass.scm (cuirass-account): Use 'file-append' instead of #~(string-append #$shadow "/sbin/nologin"). * gnu/services/monitoring.scm (zabbix-server-account): Likewise. (zabbix-agent-account): Likewise. * gnu/services/rsync.scm (rsync-account): Likewise. * gnu/services/ssh.scm (%openssh-accounts): Likewise. --- gnu/services/monitoring.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/services/monitoring.scm') diff --git a/gnu/services/monitoring.scm b/gnu/services/monitoring.scm index 685641f11..611448b73 100644 --- a/gnu/services/monitoring.scm +++ b/gnu/services/monitoring.scm @@ -258,7 +258,7 @@ configuration file.")) (group zabbix-group) (comment "zabbix privilege separation user") (home-directory (string-append "/var/run/" zabbix-user)) - (shell #~(string-append #$shadow "/sbin/nologin")))))) + (shell (file-append shadow "/sbin/nologin")))))) (define (zabbix-server-config-file config) "Return the zabbix-server configuration file corresponding to CONFIG." @@ -387,7 +387,7 @@ configuration file.")) (group zabbix-group) (comment "zabbix privilege separation user") (home-directory (string-append "/var/run/" zabbix-user)) - (shell #~(string-append #$shadow "/sbin/nologin")))))) + (shell (file-append shadow "/sbin/nologin")))))) (define (zabbix-agent-activation config) "Return the activation gexp for CONFIG." -- cgit v1.3