From 0fef05a6e926b5dc5db79cc0e86fd189ad166b33 Mon Sep 17 00:00:00 2001
From: Tim <contact@bytim.eu>
Date: Sat, 21 Jun 2025 12:05:50 +0200
Subject: Add debug prints

---
 src/chef/utils.clj | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'src/chef/utils.clj')

diff --git a/src/chef/utils.clj b/src/chef/utils.clj
index 7329737..ff906a2 100644
--- a/src/chef/utils.clj
+++ b/src/chef/utils.clj
@@ -1,5 +1,6 @@
 (ns chef.utils
-  (:require [ring.util.response :as ruresp]))
+  (:require [dotenv :as env]
+            [ring.util.response :as ruresp]))
 
 (defn gen-page [title & content]
   [:html
@@ -35,3 +36,7 @@
        (->> s
             (re-matches #"(([A-z0-9 ]*)=([0-9]*) ?([A-z]*)\n?)*")
             some?)))
+
+(defn dprintln [& content]
+  (when (= "TRUE" (env/env "DEBUG_MODE"))
+    (apply println content)))
-- 
cgit v1.2.3