     [:strong "Add some cards!"]
     ;; else
     [:div.row
-      [:div.col-md-2
+      [:div.col-md-6
         [card-type-list cards "Creature"]
         [card-type-list cards "Land"]]
       (let [noncreature-cards (remove-cards-by-type cards "Creature")]
-        [:div.col-md-2
+        [:div.col-md-6
           [card-type-list cards "Planeswalker"]
           [card-type-list cards "Instant"]
           [card-type-list cards "Sorcery"]

            [decktouch.card-input :as card-input])
  (:import goog.History))


;; -------------------------
;; Views

         :data-placement "bottom"
         :data-html true
         :data-trigger "hover"
         :title (reagent/render-component-to-string [card-img image-link])
         :onClick (fn [] (reset! displayed-card-url image-link))}
         (str (get card "name"))]]))

(defn card-in-list-did-mount [card-id]
