     (let [gen (IdGenerator.getInstance)
           columns [(->InboxColumnSource (.getNextUniqueId gen))
                    (->FakeColumnSource (.getNextUniqueId gen))]]
-      {:columns (into {} (map (juxt :id identity)) columns)}))
+      {:columns (into {} (map (juxt :id identity))
+                      columns)}))
   (will-mount [_]
     (api/fetch-inbox! state))
   (render-state [_ {:keys [columns]}]

                  (om/value new-pages))
        (om/set-state! owner :selection
                       (selection/make-selection new-pages)))))
  (render-state [_ {:keys [selection]}]
    ;; NOTE: `column' needs to be a value OR we need to extend cursors
    [:.column {:on-drag-over (when (satisfies? ColumnDropTarget (om/value column))
                               (fn [e]

  (into {}
        ;; Transducerpower
        (comp (mapcat #(column-pages (val %) state))
              #_(map om/value)
              (map (juxt :id identity)))
        columns))

