Snippet showing how I was planning to use a timeout channel to delay a possibly expensive resize operation.

resize-with-delay.cljs

(defn update-table-width [owner]
  (let [autowidth (om/get-node owner "autowidth")
        width (.-width (goog.style.getSize autowidth))]
    (om/set-state! owner :width width)))

;(defn resize-engine
;  "Sets up a core async loop to report on counters.  Waits for 1 second of
;  silence before reporting aggregates since last report."
;  [owner resizing-ch]
;  (go (loop [state :idle]
;        (case state
;          :idle (alt! resizing-ch (recur :active))
;          :active (let [timeout-ch (timeout 15)]
;                    (alt! timeout-ch (do
;                                       (update-table-width owner)
;                                       (recur :idle))
;                          resizing-ch (do (recur :active))))))))

(defn keywordUUIDs [{:keys [value] :as field}]
  (map :value value))


(defn TestThemeTable [props owner]
  (reify
    om/IDisplayName (display-name [_] "TestThemeTable")
    om/IInitState (init-state [_]
                    {:columnWidths [28 150 200 200]
                     :isColumnResizing false
                     :query ""
                     ;:resize-ch (chan)
                     :width 900})
    om/IDidMount
    (did-mount [_]
      (let [vsm (goog.dom.ViewportSizeMonitor. )]
        (goog.events.listen vsm goog.events.EventType.RESIZE #(update-table-width owner))
        ;(resize-engine owner resize-ch)
        (update-table-width owner)))