From 9a16a60554a798a805ec27cfaaa2aa23c50483dd Mon Sep 17 00:00:00 2001
From: Efraim Flashner
Date: Mon, 17 Feb 2020 02:03:44 -0600
Subject: gn: Run BNW entirely inside a container

---
 gn/services/bnw-container.scm | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'gn/services')

diff --git a/gn/services/bnw-container.scm b/gn/services/bnw-container.scm
index 8463a75..39da38d 100644
--- a/gn/services/bnw-container.scm
+++ b/gn/services/bnw-container.scm
@@ -21,10 +21,6 @@
   (match-lambda
     (($ <bnw-configuration> package deploy-directory port)
      #~(begin
-         (use-modules (guix build utils))
-         (when (directory-exists? #$deploy-directory)
-           ;; Not 'delete-file-recursively' because the directory might be empty.
-           (system* "rm" "-r" #$(string-append deploy-directory "/*")))
          (mkdir-p #$deploy-directory)
          (copy-recursively #$package #$deploy-directory)
          (invoke #$(file-append coreutils "/bin/chmod") "a+w"
-- 
cgit v1.2.3