13 lines
532 B
Clojure
13 lines
532 B
Clojure
(ns auto-ap.ssr.components.card)
|
|
|
|
(defn card- [params & children]
|
|
(into [:div (update params :class str " shadow-md dark:bg-gray-800 sm:rounded-lg border-2 border-gray-200 dark:border-gray-900 bg-white overflow-hidden")]
|
|
children))
|
|
|
|
(defn content-card- [params & children]
|
|
[:section {:class " py-3 sm:py-5"}
|
|
[:div {:class "max-w-screen-2xl"}
|
|
(into
|
|
[:div {:class "relative overflow-hidden shadow-md dark:bg-gray-800 sm:rounded-lg border-2 border-gray-200 dark:border-gray-900 bg-white"}]
|
|
children)]])
|