 (defn value-event
   [event]
   (-> event .-target .-value))
+
+;; -- VIEW portion, with some view logic as well
 
 (defn nav-link [uri title page collapsed?]
   [:li {:class (when (= page (session/get :page)) "active")}

  (:require-macros [reagent.ratom :refer [reaction]])
  (:import goog.History))


(re-frame/register-handler
  :process-teas-response

     [tea-adder]]
    [:div.col-xs-6]]])

;; -- Routes, etc.

(def pages
  {:home #'home-page
