-;; Functions for rendering state to screen
+;; Functions for rendering state to screen)
 (ns robinson.ui.components.robinson
   (:require 
             [taoensso.timbre :as log]

    (async/<! (async/timeout (rand-nth [1200 600])))
    (recur (update tidbit-freqs n inc))))

(zc/def-component Loading
  [this]
  (let [{:keys [state]} (zc/props this)]

            [:view {:style {:width "100%" :height "100%" :background-color (rcolor/color->rgb :black)}} [
              [:view {:style {:position :absolute
                              :top 10
                              :left 36
                              :width 80
                              :height 24}} [
                [:text {} ["Connecting..."]]
                [:text {} [""]]
                [:text {:style {:left 5}} [(first @spinner-chars)]]]]]]]]]]]])))

(zc/def-component ConnectionFailed
  [this]
