 
 (defn resetclientstate []
   (do
-    (reset!  app-state                 {})
-    (reset!  app-state                 blank-app-state)
+    (swap!   app-state                 assoc :ui {})
     (reset!  paths-for-refresh         {})
     (reset!  data-views                {})
     (reset!  client-data-windows       {})


(defonce start-component
  (atom nil))










"
The UI tree
"
(defonce app-state
  (atom
    {}))

















  "
  This holds all the fns to call at the start of the
  webapp
  "
(defonce init-state-fns
  (atom []))








"
The UI tree
"
(defonce app-state
  (atom
    blank-app-state))

















  "
  This holds all the fns to call at the start of the
  webapp
  "
(defonce init-state-fns
  (atom []))




















