     [: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"]

                    [:p.text-right (str (count (remove-cards-by-type @card-data/card-list "Creature"))) " Non-creature Spells"]
                    [:p.text-right (str (count (filter-cards-by-type @card-data/card-list "Creature"))) " Creatures"]
                    [:p.text-right (str (count (filter-cards-by-type @card-data/card-list "Land"))) " Lands"]]]
        [:div.row [card-list @card-data/card-list]]]])

(defn about-page []
  [:div [:h2 "About decktouch"]

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

(def displayed-card-url (reagent/atom ""))

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