aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/build/activation.scm6
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)))