diff --git a/glicid/services/parallel.scm b/glicid/services/parallel.scm
index f0a07f8..0494621 100644
--- a/glicid/services/parallel.scm
+++ b/glicid/services/parallel.scm
@@ -157,6 +157,9 @@
   (with-imported-modules '((guix build utils))
     #~(begin
         (use-modules (guix build utils))
+        (define (touch file-name)
+          (call-with-output-file file-name (const #t))
+        )
         ;(chmod "0600" "/etc/slurm/slurmdbd.conf")
         (mkdir-p "/var/log/slurm")
         (mkdir-p "/var/lib/slurm-archives")
@@ -233,11 +236,18 @@
   (with-imported-modules '((guix build utils))
     #~(begin
         (use-modules (guix build utils))
+        (define (touch file-name)
+          (call-with-output-file file-name (const #t))
+        )
         (mkdir-p "/var/log/slurm")
         (mkdir-p "/var/lib/slurm-archives")
         (mkdir-p "/var/lib/slurm")
         (mkdir-p "/var/spool/slurmctld")
+        (touch "/var/log/slurm/slurmctld.log")
+        (touch "/var/run/slurmctld.pid")
         (chown "/var/log/slurm" (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
+        (chown "/var/log/slurm/slurmctld.log" (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
+        (chown "/var/run/slurmctld.pid" (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
         (chown "/var/lib/slurm-archives" (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
         (chown "/var/lib/slurm" (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
         (chown "/var/spool/slurmctld" (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
@@ -245,7 +255,7 @@
         (for-each (lambda (slurm-file)
           (chown slurm-file (passwd:uid (getpwnam "slurm")) (passwd:gid (getpwnam "slurm")))
           (chmod "0600" slurm-file)
-        )(find-files "/etc/slurm/" "*"))
+        )(find-files "/etc/slurm/"))
         #t
     )
   )
@@ -344,6 +354,9 @@
   (with-imported-modules '((guix build utils))
     #~(begin
         (use-modules (guix build utils))
+        (define (touch file-name)
+          (call-with-output-file file-name (const #t))
+        )
         (mkdir-p "/var/log/slurm")
         (mkdir-p "/var/lib/slurm-archives")
         (mkdir-p "/var/lib/slurm")