From d3abba68fe367d18a29bd12aa320f4a57a5fe57d Mon Sep 17 00:00:00 2001
From: ckonstanski <kostcarl@isu.edu>
Date: Sat, 28 Mar 2026 13:59:54 -0600
Subject: loop..do cleanup

---
 lisp/webapps/bogenherr/clojurescript/bogenherr/src/core.cljs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lisp/webapps/bogenherr/clojurescript')

diff --git a/lisp/webapps/bogenherr/clojurescript/bogenherr/src/core.cljs b/lisp/webapps/bogenherr/clojurescript/bogenherr/src/core.cljs
index 80862b3..6e5276d 100644
--- a/lisp/webapps/bogenherr/clojurescript/bogenherr/src/core.cljs
+++ b/lisp/webapps/bogenherr/clojurescript/bogenherr/src/core.cljs
@@ -164,7 +164,7 @@
 (declare goto-location)
 (declare reset-app)
 (declare goto-register)
-(declare site)
+(declare comp-app)
 (declare start-render)
 (declare start-nav-state)
 (declare reset-nav-state)
@@ -204,7 +204,7 @@
 
 ;; body
 
-(defn site []
+(defn comp-app []
   [:div {:class "container-fluid"}
    [:div {:class "banner"}
     [:table {:width "100%" :height "100%"}
@@ -226,7 +226,7 @@
 
 (defn start-render []
   (let [app-root (rdc/create-root (js/document.getElementById "app"))]
-    (rdc/render app-root [site])))
+    (rdc/render app-root [comp-app])))
 
 (defn start-nav-state []
   (cond (str/starts-with? (@nav-state :location) "/register/")
-- 
cgit v1.3