     (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]}]

        target-pages (mapv :id (column-pages target state))
        pages (into []
                    (comp (remove (set target-pages))
                          (map page-cache))
                    page-ids)]
    (if-not (seq pages)
      (js/console.warn "Ignoring drop consisting only of duplicate pages:"

  [selected-pages page]
  (assoc page :selected? (contains? (set selected-pages) (:id page))))

(ui/defcomponent inbox-column [[state column] owner opts]
  (init-state [_]
    {:selection (->> (column-pages column state)
                     (map :id)
