giles
a30e7228d8
Nested component calls in _aser are serialized without body expansion, so free variables inside ~root-header would be sent unresolved to the client. Fix by making ~root-header/~root-mobile take all values as &key params, and having parent layout defcomps pass them explicitly. The parent layout bodies ARE expanded (via async_eval_slot_to_sx), so their free variables resolve correctly during that expansion. Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
60 lines
2.9 KiB
Plaintext
60 lines
2.9 KiB
Plaintext
;; Orders layout defcomps — read ctx values from env free variables.
|
|
;; Registered via register_sx_layout("orders", ...) in __init__.py.
|
|
|
|
;; --- orders layout: root + auth + orders rows ---
|
|
|
|
(defcomp ~orders-layout-full (&key list-url)
|
|
(<> (~root-header :cart-mini cart-mini :blog-url blog-url :site-title site-title
|
|
:app-label app-label :nav-tree nav-tree :auth-menu auth-menu
|
|
:nav-panel nav-panel :settings-url settings-url :is-admin is-admin)
|
|
(~header-child-sx
|
|
:inner (<> (~auth-header-row :account-url account-url
|
|
:select-colours select-colours
|
|
:account-nav account-nav)
|
|
(~orders-header-row :list-url (or list-url "/"))))))
|
|
|
|
(defcomp ~orders-layout-oob (&key list-url)
|
|
(<> (~auth-header-row :account-url account-url
|
|
:select-colours select-colours
|
|
:account-nav account-nav
|
|
:oob true)
|
|
(~oob-header-sx
|
|
:parent-id "auth-header-child"
|
|
:row (~orders-header-row :list-url (or list-url "/")))
|
|
(~root-header :cart-mini cart-mini :blog-url blog-url :site-title site-title
|
|
:app-label app-label :nav-tree nav-tree :auth-menu auth-menu
|
|
:nav-panel nav-panel :settings-url settings-url :is-admin is-admin
|
|
:oob true)))
|
|
|
|
(defcomp ~orders-layout-mobile ()
|
|
(~root-mobile :nav-tree nav-tree :auth-menu auth-menu))
|
|
|
|
;; --- order-detail layout: root + auth + orders + order rows ---
|
|
|
|
(defcomp ~order-detail-layout-full (&key list-url detail-url)
|
|
(<> (~root-header :cart-mini cart-mini :blog-url blog-url :site-title site-title
|
|
:app-label app-label :nav-tree nav-tree :auth-menu auth-menu
|
|
:nav-panel nav-panel :settings-url settings-url :is-admin is-admin)
|
|
(~order-detail-header-stack
|
|
:auth (~auth-header-row :account-url account-url
|
|
:select-colours select-colours
|
|
:account-nav account-nav)
|
|
:orders (~orders-header-row :list-url (or list-url "/"))
|
|
:order (~menu-row-sx :id "order-row" :level 3 :colour "sky"
|
|
:link-href (or detail-url "/") :link-label "Order"
|
|
:icon "fa fa-gbp"))))
|
|
|
|
(defcomp ~order-detail-layout-oob (&key detail-url)
|
|
(<> (~oob-header-sx
|
|
:parent-id "orders-header-child"
|
|
:row (~menu-row-sx :id "order-row" :level 3 :colour "sky"
|
|
:link-href (or detail-url "/") :link-label "Order"
|
|
:icon "fa fa-gbp" :oob true))
|
|
(~root-header :cart-mini cart-mini :blog-url blog-url :site-title site-title
|
|
:app-label app-label :nav-tree nav-tree :auth-menu auth-menu
|
|
:nav-panel nav-panel :settings-url settings-url :is-admin is-admin
|
|
:oob true)))
|
|
|
|
(defcomp ~order-detail-layout-mobile ()
|
|
(~root-mobile :nav-tree nav-tree :auth-menu auth-menu))
|