3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-19 11:36:13 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Move survey to local resources

Browse source
This commit is contained in:
Alejandro Alonso 2023-05-16 10:46:50 +02:00 • committed by Andrey Antukh
parent b6d60773e3
commit a1c09057c1
10 changed files with 704 additions and 385 deletions
Download patch file Download diff file Expand all files Collapse all files

24
frontend/src/app/main/ui/components/forms.cljs
View file

@ -230,6 +230,30 @@
[:div.icon
i/arrow-slide]]]))
(mf/defc radio-buttons
[{:keys [name options form trim] :as props}]
(let [form (or form (mf/use-ctx form-ctx))
value (get-in @form [:data name] "")
on-change (fn [event]
(let [value (-> event dom/get-target dom/get-value)]
(swap! form assoc-in [:touched name] true)
(fm/on-input-change form name value trim)))]
[:div.custom-radio
(for [item options]
(let [id (str/ffmt "%-%" name (:value item))
image (:image item)]
[:div.input-radio {:key id :class (when image "with-image")}
[:input {:on-change on-change
:type "radio"
:id id
:name name
:value (:value item)
:checked (= value (:value item))}]
[:label {:for id
:style {:background-image (when image (str/ffmt "url(%)" image))}
:class (when image "with-image")}
(:label item)]]))]))
(mf/defc submit-button
[{:keys [label form on-click disabled data-test] :as props}]
(let [form (or form (mf/use-ctx form-ctx))]