 
 (defonce rc-app-version
   (cc-app [:version]))
-
-(defonce rc-cha-dom-viewport-resize
-  (cc-cha [:dom-viewport-resize]))
-
-(defonce rc-cha-env-mouse-down
-  (cc-cha [:env-mouse-down]))
-
-(defonce rc-cha-env-mouse-move
-  (cc-cha [:env-mouse-move]))
-
-(defonce rc-cha-env-mouse-up
-  (cc-cha [:env-mouse-up]))
 
 (defonce rc-dom-document-h
   (cc-dom [:document-height]))



;; -----------------------------------------------------------------------------
;; Channels

(defonce setup-channels!
  (do
    (reset! rc-cha-dom-viewport-resize
            (poly/channel-for-viewport-resize!))
    (reset! rc-cha-env-mouse-move
            (poly/channel-for-mouse-move! js/window))
    true))


;; -----------------------------------------------------------------------------
;; Event Handlers (On and on and on, over and over again...)

(defn on-dom-viewport-resize [{:keys [width height]}]

  (poly/listen-for-viewport-resize! on-dom-viewport-resize))

(defonce listen-for-dom-viewport-resize!
  (poly/listen-take! (get-channel :dom-viewport-resize) on-dom-viewport-resize))

(defonce listen-for-dom-window-load!
  (poly/listen! js/window "load" on-dom-window-load))

(defonce listen-for-env-mouse-move!
  (poly/listen-take! (get-channel :env-mouse-move) on-env-mouse-move))


;; -----------------------------------------------------------------------------
