From f0b7be3fc8e612821d03e548905aa8410d9e7704 Mon Sep 17 00:00:00 2001
From: EuAndreh <eu@euandre.org>
Date: Thu, 29 Aug 2024 13:36:31 -0300
Subject: packages.scm: Remove file before symlinking (A.K.A.: ln -fs)

---
 src/org/euandre/packages.scm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/org/euandre/packages.scm')

diff --git a/src/org/euandre/packages.scm b/src/org/euandre/packages.scm
index d2aa93b..c99c802 100644
--- a/src/org/euandre/packages.scm
+++ b/src/org/euandre/packages.scm
@@ -588,6 +588,7 @@
           (define (link from to)
             (format (current-error-port)
              "Symlink: ~a -> ~a~%" to from)
+            (delete-file to)
             (symlink from to))
           (link    "mnt/production/opt" "/opt")
           (link    "mnt/production/srv" "/srv")
-- 
cgit v1.2.3