diff options
Diffstat (limited to 'guix/forge/tissue.scm')
-rw-r--r-- | guix/forge/tissue.scm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/guix/forge/tissue.scm b/guix/forge/tissue.scm index 81771c9..ab86a11 100644 --- a/guix/forge/tissue.scm +++ b/guix/forge/tissue.scm @@ -221,9 +221,7 @@ available both as a command-line program and as a web server.") (chown socket-directory (passwd:uid user) (passwd:gid user)))) ;; Create state directory. (mkdir-p #$state-directory) - (for-each (lambda (file) - (chown file (passwd:uid user) (passwd:gid user))) - (find-files #$state-directory #:directories? #t))) + (chown #$state-directory (passwd:uid user) (passwd:gid user))) ;; Create host directories if they don't exist, and set ;; permissions. (for-each (match-lambda |