giles
e8bc228c7f
Rename all sexp directories, files, identifiers, and references to sx. artdag/ excluded (separate media processing DSL). Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
60 lines
4.0 KiB
Plaintext
60 lines
4.0 KiB
Plaintext
;; Events payments components
|
|
|
|
(defcomp ~events-payments-panel (&key update-url csrf merchant-code placeholder input-cls sumup-configured checkout-prefix)
|
|
(section :class "p-4 max-w-lg mx-auto"
|
|
(div :id "payments-panel" :class "space-y-4 p-4 bg-white rounded-lg border border-stone-200"
|
|
(h3 :class "text-lg font-semibold text-stone-800"
|
|
(i :class "fa fa-credit-card text-purple-600 mr-1") " SumUp Payment")
|
|
(p :class "text-xs text-stone-400" "Configure per-page SumUp credentials. Leave blank to use the global merchant account.")
|
|
(form :sx-put update-url :sx-target "#payments-panel" :sx-swap "outerHTML" :sx-select "#payments-panel" :class "space-y-3"
|
|
(input :type "hidden" :name "csrf_token" :value csrf)
|
|
(div (label :class "block text-xs font-medium text-stone-600 mb-1" "Merchant Code")
|
|
(input :type "text" :name "merchant_code" :value merchant-code :placeholder "e.g. ME4J6100" :class input-cls))
|
|
(div (label :class "block text-xs font-medium text-stone-600 mb-1" "API Key")
|
|
(input :type "password" :name "api_key" :value "" :placeholder placeholder :class input-cls)
|
|
(when sumup-configured (p :class "text-xs text-stone-400 mt-0.5" "Key is set. Leave blank to keep current key.")))
|
|
(div (label :class "block text-xs font-medium text-stone-600 mb-1" "Checkout Reference Prefix")
|
|
(input :type "text" :name "checkout_prefix" :value checkout-prefix :placeholder "e.g. ROSE-" :class input-cls))
|
|
(button :type "submit" :class "px-4 py-1.5 text-sm font-medium text-white bg-purple-600 rounded hover:bg-purple-700 focus:ring-2 focus:ring-purple-500"
|
|
"Save SumUp Settings")
|
|
(when sumup-configured (span :class "ml-2 text-xs text-green-600"
|
|
(i :class "fa fa-check-circle") " Connected"))))))
|
|
|
|
(defcomp ~events-markets-create-form (&key create-url csrf)
|
|
(<>
|
|
(div :id "market-create-errors" :class "mt-2 text-sm text-red-600")
|
|
(form :class "mt-4 flex gap-2 items-end" :sx-post create-url
|
|
:sx-target "#markets-list" :sx-select "#markets-list" :sx-swap "outerHTML"
|
|
:sx-on:beforeRequest "document.querySelector('#market-create-errors').textContent='';"
|
|
:sx-on:responseError "document.querySelector('#market-create-errors').textContent='Error'; if(event.detail.response){event.detail.response.clone().text().then(function(t){event.target.closest('form').querySelector('[id$=errors]').innerHTML=t})}"
|
|
(input :type "hidden" :name "csrf_token" :value csrf)
|
|
(div :class "flex-1"
|
|
(label :class "block text-sm text-gray-600" "Name")
|
|
(input :name "name" :type "text" :required true :class "w-full border rounded px-3 py-2"
|
|
:placeholder "e.g. Farm Shop, Bakery"))
|
|
(button :type "submit" :class "border rounded px-3 py-2" "Add market"))))
|
|
|
|
(defcomp ~events-markets-panel (&key form list)
|
|
(section :class "p-4"
|
|
form
|
|
(div :id "markets-list" :class "mt-6" list)))
|
|
|
|
(defcomp ~events-markets-empty ()
|
|
(p :class "text-gray-500 mt-4" "No markets yet. Create one above."))
|
|
|
|
(defcomp ~events-markets-item (&key href market-name market-slug del-url csrf-hdr)
|
|
(div :class "mt-6 border rounded-lg p-4"
|
|
(div :class "flex items-center justify-between gap-3"
|
|
(a :class "flex items-baseline gap-3" :href href
|
|
(h3 :class "font-semibold" market-name)
|
|
(h4 :class "text-gray-500" (str "/" market-slug "/")))
|
|
(button :class "text-sm border rounded px-3 py-1 hover:bg-red-50 hover:border-red-400"
|
|
:data-confirm true :data-confirm-title "Delete market?"
|
|
:data-confirm-text "Products will be hidden (soft delete)"
|
|
:data-confirm-icon "warning" :data-confirm-confirm-text "Yes, delete it"
|
|
:data-confirm-cancel-text "Cancel" :data-confirm-event "confirmed"
|
|
:sx-delete del-url :sx-trigger "confirmed"
|
|
:sx-target "#markets-list" :sx-select "#markets-list" :sx-swap "outerHTML"
|
|
:sx-headers csrf-hdr
|
|
(i :class "fa-solid fa-trash")))))
|