diff options
-rw-r--r-- | guix/fixed-fcgiwrap.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/fixed-fcgiwrap.scm b/guix/fixed-fcgiwrap.scm index f482d57..cb7288b 100644 --- a/guix/fixed-fcgiwrap.scm +++ b/guix/fixed-fcgiwrap.scm @@ -95,10 +95,10 @@ (#f 0))) (define (ensure-socket-dir dir user group) (unless (file-exists? dir) - (mkdir file) ; FIXME: use mkdir-p instead? + (mkdir dir) ; FIXME: use mkdir-p instead? (let ((uid (passwd:uid (getpwnam user))) (gid (group:gid (getgrnam group)))) - (chown file uid gid)))) + (chown dir uid gid)))) (define start-fcgiwrap (make-forkexec-constructor '(#$(file-append package "/sbin/fcgiwrap") |