diff options
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/services.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gnu/services.scm b/gnu/services.scm index 4af90de662..9b7f2641b7 100644 --- a/gnu/services.scm +++ b/gnu/services.scm @@ -632,7 +632,7 @@ information is missing, return the empty list (for channels) and possibly #~(begin (use-modules (guix build utils)) - ;; Clean out /tmp and /var/run. + ;; Clean out /tmp, /var/run, and /run. ;; ;; XXX This needs to happen before service activations, so it ;; has to be here, but this also implicitly assumes that /tmp @@ -663,10 +663,11 @@ information is missing, return the empty list (for channels) and possibly (setlocale LC_CTYPE "en_US.utf8") (delete-file-recursively "/tmp") (delete-file-recursively "/var/run") + (delete-file-recursively "/run") (mkdir "/tmp" #o1777) (mkdir "/var/run" #o755) - (delete-file-recursively "/run/udev/watch.old")))))) + (mkdir "/run" #o755)))))) (define cleanup-service-type ;; Service that cleans things up in /tmp and similar. |