 (defcard card-transparent-visual-regressions
   (l/row {}
      (for [color [:neutral :primary :accent]
-           size [:normal :expand :wide]
            actions ["" (e/ui-flat-button {:color :primary} "Action")]]
-       (l/col {:width 6 :key (str color size actions (rand-int 256))}
-         (e/ui-card {:type :transparent :title "Card Test" :color color :size size :actions actions}
-          (dom/div nil
-            (dom/p nil (str "Color: " (name color)))
-            (dom/p nil (str "Size: " (name size)))
-            (dom/p nil (str "Actions: " (object? actions)))))))
-
-
-     (l/row {}
-       (for [image          ["" "img/bubbles.png" "img/welcome_card.jpg"]
-             image-position [:none :top-left :top-right :bottom-left :bottom-right]]
+       (l/col {:width 6 :key (str color actions (rand-int 256))}
+         (e/ui-card {:type :transparent :title "Card Test" :color color :actions actions}
+          (dom/div nil
+            (dom/p nil (str "Color: " (name color)))))))
+
+
+     (l/row {}
+       (for [image          ["img/bubbles.png" "img/welcome_card.jpg"]
+             image-position [:top-left :top-right :bottom-left :bottom-right]]
          (l/col {:width 6 :key (str image image-position (rand-int 256))}
            (e/ui-card {:type :transparent :title "Card Test" :color :primary :image image :image-position image-position}
             (dom/div nil


(defcard notifications-visual-regressions
  (dom/div nil
    (for [kind [:normal :informative :success :warning :error]]
      (dom/div nil
        (e/ui-notification
         {:kind kind :key kind}
         ;; TODO Warning key prop needed on NotificationTitle but simply setting one doesn't suppress the error.
         (e/ui-notification-title {:key (str "nvr-title-" kind)} (str (str/capitalize (name kind))))
         (e/ui-notification-body {} "Your message here..."))
        (dom/p nil " ")))))

(defcard notifications-wide-visual-regressions
  (dom/div nil
    (for [kind [:normal :informative :success :warning :error]]
      (dom/div nil
        (e/ui-notification
         {:kind kind :key (str kind "-wide") :width :wide}
         (e/ui-notification-title {:key (str "nvr-wide-title-" kind)} (str (str/capitalize (name kind))))
         (e/ui-notification-body {} "Your message here..."))
        (dom/p nil " ")))))

         (e/ui-card {:type :bordered :title "Card Test" :color color :size size :actions actions}
          (dom/div nil
            (dom/p nil (str "Color: " (name color)))
            (dom/p nil (str "Size: " (name size)))))))


     (l/row {}
       (for [image          ["img/bubbles.png" "img/welcome_card.jpg"]
             image-position [:top-left :top-right :bottom-left :bottom-right]]
         (l/col {:width 6 :key (str image image-position (rand-int 256))}
           (e/ui-card {:type :bordered :title "Card Test" :color :primary :image image :image-position image-position}
            (dom/div nil
