diff options
Diffstat (limited to 'guix/build/activation.scm')
| -rw-r--r-- | guix/build/activation.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix/build/activation.scm b/guix/build/activation.scm index 895f2bca5b..267c592b52 100644 --- a/guix/build/activation.scm +++ b/guix/build/activation.scm @@ -73,7 +73,11 @@ properties. Return #t on success." `("-G" ,(string-join supplementary-groups ",")) '()) ,@(if comment `("-c" ,comment) '()) - ,@(if home `("-d" ,home "--create-home") '()) + ,@(if home + (if (file-exists? home) + `("-d" ,home) ; avoid warning from 'useradd' + `("-d" ,home "--create-home")) + '()) ,@(if shell `("-s" ,shell) '()) ,@(if password `("-p" ,password) '()) ,name))) |