 
 (def draggable-log-window (draggable-item log-window [:position]))
 
+;; }}}
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; {{{ FPS Component
 (defn fps-calc-chan
   ([in-chan window-size]
    (let [ret-chan (chan)]

      game/IGameClose
      (game-close [this]
        this))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



    [om.core :as om :include-macros true]
    [om.dom  :as dom :include-macros true]))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(enable-console-print!)

;;; }}}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; {{{ Log Window
(def log-chan (chan))
(def log-state (atom {}) )

(defn log-window 
  [{:keys [in-chan class-name] :as data} owner ]
  (let [in-chan    (or in-chan (chan)) 
