giles
22802bd36b
All checks were successful
Build and Deploy / build-and-deploy (push) Successful in 5m35s
- Server sends sexp source text, client (sexp.js) renders everything - SexpExpr marker class for nested sexp composition in serialize() - sexp_page() HTML shell with data-mount="body" for full page loads - sexp_response() returns text/sexp for OOB/partial responses - ~app-body layout component replaces ~app-layout (no raw!) - ~rich-text is the only component using raw! (for CMS HTML content) - Fragment endpoints return text/sexp, auto-wrapped in SexpExpr - All _*_html() helpers converted to _*_sexp() returning sexp source - Head auto-hoist: sexp.js moves meta/title/link/script[ld+json] from rendered body to document.head automatically - Unknown components render warning box instead of crashing page - Component kwargs preserve AST for lazy rendering (fixes <> in kwargs) - Fix unterminated paren in events/sexp/tickets.sexpr Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
45 lines
1.8 KiB
Plaintext
45 lines
1.8 KiB
Plaintext
;; Cart header components
|
|
|
|
(defcomp ~cart-page-label-img (&key src)
|
|
(img :src src :class "h-8 w-8 rounded-full object-cover border border-stone-300 flex-shrink-0"))
|
|
|
|
(defcomp ~cart-all-carts-link (&key href)
|
|
(a :href href :class "inline-flex items-center gap-1.5 px-3 py-1.5 text-sm rounded-full border border-stone-300 bg-white hover:bg-stone-50 transition"
|
|
(i :class "fa fa-arrow-left text-xs" :aria-hidden "true") "All carts"))
|
|
|
|
(defcomp ~cart-header-child (&key inner)
|
|
(div :id "root-header-child" :class "flex flex-col w-full items-center"
|
|
inner))
|
|
|
|
(defcomp ~cart-header-child-nested (&key outer inner)
|
|
(div :id "root-header-child" :class "flex flex-col w-full items-center"
|
|
outer
|
|
(div :id "cart-header-child" :class "flex flex-col w-full items-center"
|
|
inner)))
|
|
|
|
(defcomp ~cart-header-child-oob (&key inner)
|
|
(div :id "cart-header-child" :sx-swap-oob "outerHTML" :class "flex flex-col w-full items-center"
|
|
inner))
|
|
|
|
(defcomp ~cart-auth-header-child (&key auth orders)
|
|
(div :id "root-header-child" :class "flex flex-col w-full items-center"
|
|
auth
|
|
(div :id "auth-header-child" :class "flex flex-col w-full items-center"
|
|
orders)))
|
|
|
|
(defcomp ~cart-auth-header-child-oob (&key inner)
|
|
(div :id "auth-header-child" :sx-swap-oob "outerHTML" :class "flex flex-col w-full items-center"
|
|
inner))
|
|
|
|
(defcomp ~cart-order-header-child (&key auth orders order)
|
|
(div :id "root-header-child" :class "flex flex-col w-full items-center"
|
|
auth
|
|
(div :id "auth-header-child" :class "flex flex-col w-full items-center"
|
|
orders
|
|
(div :id "orders-header-child" :class "flex flex-col w-full items-center"
|
|
order))))
|
|
|
|
(defcomp ~cart-orders-header-child-oob (&key inner)
|
|
(div :id "orders-header-child" :sx-swap-oob "outerHTML" :class "flex flex-col w-full items-center"
|
|
inner))
|