   [{:keys [className size color disabled active] :or {className ""} :as props} & children]
   (apply ui-flat-button (update props :className str " c-button--circular") children))
 
-(def color-types
-  {:primary "c-card--primary"
-   :accent  "c-card--accent"})
-
-(def card-types
-  {:bordered    "c-card--bordered"
-   :transparent "c-card--transparent"
-   :square      "c-card--square"})
-
-(def size-types
-  {:expand "c-card--expand"
-   :wide   "c-card--wide"})
 
 (defn ui-card
   "Card component

           ;; menu-icon
           ;; menu-items
           className] :as attrs} & children]
  {:pre [(or (nil? type) (keyword? type))
         (or (nil? title) (string? title))]}
  (let [className  (or className "")
        classes    (cond->
                     (str "c-card " className)
                     type (str " " (card-types type))
                     size (str " " (size-types size))
                     color (str " " (color-types color)))
        attributes (-> attrs
                     (merge {:className classes})
                     (dissoc :title :type :color :size :actions :image :image-position :media-type :media)
                     clj->js)]
    (dom/div attributes
      (when media
        (dom/div #js {:className (str "c-card__media")}

            (when content content)
            (when actions actions)))
        (dom/div #js {:className (str "c-backdrop" state)})))))

(def ui-modal
  "Render a modal. Normal HTML/React attributes can be included, and should be a cljs map (not a js object).
