grug

commit d14877c05b5a273e3eb3e7b3f505ec8498bc89d8
parent c10f7c3546d80999ffed7ec837bf4254d7fd4bcd
Author: Luke Willis <lukejw@loquat.dev>
Date:   Sat,  5 Jul 2025 02:34:51 -0400

Fix error from trying to remove build-directory when it doesn't exist yet

Diffstat:
M
grug/site.scm
 | 
5
++++-

1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/grug/site.scm b/grug/site.scm
@@ -27,6 +27,9 @@
   (make-site build-directory metadata reader builders))
 
 (define (build-site site)
-  (delete-file-recursively (site-build-directory site))
+  ;; Reset site build directory
+  (when (file-exists? (site-build-directory site))
+    (delete-file-recursively (site-build-directory site)))
   (mkdir (site-build-directory site))
+  ;; Run builders for site
   (for-each (cut <> site) (site-builders site)))