summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2024-08-31 21:11:30 +0200
committerLudovic Courtès <ludo@gnu.org>2024-09-25 16:03:20 +0200
commitc250033aa69f35e64949a87fd8482b253dd416b4 (patch)
tree39719aba4883449148eaf597f5d7be9e1368366f
parente74d05db53fdf02956ccee0950896c6ca9f10573 (diff)
downloadguix-patches-c250033aa69f35e64949a87fd8482b253dd416b4.tar
guix-patches-c250033aa69f35e64949a87fd8482b253dd416b4.tar.gz
services: cleanup: Delete /run upon boot.
Fixes <https://issues.guix.gnu.org/64775>. * gnu/services.scm (cleanup-gexp): Delete /run and recreate it. Reported-by: Vagrant Cascadian <vagrant@debian.org> Change-Id: Iae39f1aa734712a3755b24b156802ec0282d3f14
-rw-r--r--gnu/services.scm5
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.