From 44f70a6f610fa28145e26fe05970c0e30e056a59 Mon Sep 17 00:00:00 2001 From: Kinneyzhang Date: Wed, 26 Aug 2026 16:23:53 +0800 Subject: [PATCH] refactor: express examples with canonical Box layouts --- examples/etaf-counter-example.el | 14 +++++++------- examples/etaf-data-example.el | 16 ++++++++-------- examples/etaf-resource-example.el | 14 +++++++------- 3 files changed, 22 insertions(+), 22 deletions(-) diff --git a/examples/etaf-counter-example.el b/examples/etaf-counter-example.el index 0d4b386..b8f6608 100644 --- a/examples/etaf-counter-example.el +++ b/examples/etaf-counter-example.el @@ -28,7 +28,7 @@ (defun etaf-counter-example--header (title) "Return the counter header for TITLE." (etaf-view - (column :class "hero" + (box :layout 'column :class "hero" (text :class "eyebrow" "BEST PRACTICE / RETAINED STATE") (text :face 'bold (expr :value title)) (text :color "#66706A" @@ -37,7 +37,7 @@ (defun etaf-counter-example--metrics (count double status) "Return metric cards for COUNT, DOUBLE, and STATUS." (etaf-view - (flex :width '(680) :flex-flow '(row wrap) :gap '(1 (12)) + (box :layout 'flex :width '(680) :flex-flow '(row wrap) :gap '(1 (12)) (text :class "metric" (expr :value (format "COUNT %d" (etaf-value count)))) (text :class "metric" @@ -58,7 +58,7 @@ (defun etaf-counter-example--actions (count) "Return the action group for COUNT." (etaf-view - (flex :width '(680) :flex-flow '(row wrap) :gap '(1 (12)) + (box :layout 'flex :width '(680) :flex-flow '(row wrap) :gap '(1 (12)) (expr :value (etaf-counter-example--action count "− DECREMENT" 'counter-decrement 'decrement)) @@ -96,14 +96,14 @@ :name 'counter-status))) (lambda () (etaf-view - (column + (box :layout 'column (expr :value (etaf-counter-example--header title)) - (spacer :height 1) + (box :height 1) (expr :value (etaf-counter-example--metrics count double status)) - (spacer :height 1) + (box :height 1) (expr :value (etaf-counter-example--actions count)) - (spacer :height 1) + (box :height 1) (text :class "note" "Public path: Event → Action → Ref → Computed → Runtime commit")))))) diff --git a/examples/etaf-data-example.el b/examples/etaf-data-example.el index 481319d..689d6c4 100644 --- a/examples/etaf-data-example.el +++ b/examples/etaf-data-example.el @@ -52,7 +52,7 @@ (status (plist-get task :status)) (host-ref (intern (format "data-task-%d" identity)))) (etaf-view - (flex :width '(718) :flex-flow '(row nowrap) :gap '(0 (10)) + (box :layout 'flex :width '(718) :flex-flow '(row nowrap) :gap '(0 (10)) :padding '(1 (12)) :border "#6D8A73" :bgcolor (if selected "#DCEBDD" "#FFFDF8") :ref host-ref :role 'button :use (list (etaf-focusable)) @@ -76,7 +76,7 @@ (let ((total (etaf-value (etaf-data-total controller))) (selection (etaf-value (etaf-data-selection controller)))) (etaf-view - (column :width '(720) :padding '(1 (18)) :border "#8F432F" + (box :layout 'column :width '(720) :padding '(1 (18)) :border "#8F432F" :bgcolor "#FFFDF8" :text-align 'center (text :color "#8F432F" :face 'bold "BEST PRACTICE / DATA OWNERSHIP") @@ -101,7 +101,7 @@ Use BORDER and BACKGROUND for its semantic color family." (defun etaf-data-example--toolbar (controller next-id) "Return the action toolbar for CONTROLLER and NEXT-ID." (etaf-view - (flex :width '(720) :flex-flow '(row wrap) :gap '(1 (10)) + (box :layout 'flex :width '(720) :flex-flow '(row wrap) :gap '(1 (10)) (expr :value (etaf-data-example--filter-control controller "ALL" 'data-filter-all nil "#4E7890" "#D9EAF2")) @@ -134,14 +134,14 @@ Use BORDER and BACKGROUND for its semantic color family." (defun etaf-data-example--view (controller next-id) "Return the Data example View for CONTROLLER and NEXT-ID." (etaf-view - (column :width '(720) :color "#252A2E" :bgcolor "#F8F5EE" + (box :layout 'column :width '(720) :color "#252A2E" :bgcolor "#F8F5EE" (expr :value (etaf-data-example--header controller)) - (spacer :height 1) + (box :height 1) (expr :value (etaf-data-example--toolbar controller next-id)) - (spacer :height 1) - (column :width '(720) + (box :height 1) + (box :layout 'column :width '(720) (expr :value (etaf-data-example--rows controller))) - (spacer :height 1) + (box :height 1) (text :width '(720) :padding '(1 (16)) :border "#8D887F" :color "#4D5651" :bgcolor "#EEEAE2" "Owner rule: create in setup, mutate through Data, stop on unmount")))) diff --git a/examples/etaf-resource-example.el b/examples/etaf-resource-example.el index 75e5268..8963b9d 100644 --- a/examples/etaf-resource-example.el +++ b/examples/etaf-resource-example.el @@ -25,7 +25,7 @@ (defun etaf-resource-example--header () "Return the Resource example header." (etaf-view - (column :width '(680) :padding '(1 (18)) :border "#8F432F" + (box :layout 'column :width '(680) :padding '(1 (18)) :border "#8F432F" :bgcolor "#FFFDF8" :text-align 'center (text :color "#8F432F" :face 'bold "BEST PRACTICE / RESOURCE LIFECYCLE") @@ -41,7 +41,7 @@ (border (if success "#6D8A73" "#C97252")) (ink (if success "#24422D" "#6B3020"))) (etaf-view - (column :width '(680) :padding '(2 (18)) :border border + (box :layout 'column :width '(680) :padding '(2 (18)) :border border :bgcolor surface :color ink :text-align 'center (text :face 'bold (expr :value (upcase (symbol-name status)))) @@ -53,7 +53,7 @@ (defun etaf-resource-example--actions (resource fail-next) "Return action controls for RESOURCE and FAIL-NEXT." (etaf-view - (flex :width '(680) :flex-flow '(row wrap) :gap '(1 (12)) + (box :layout 'flex :width '(680) :flex-flow '(row wrap) :gap '(1 (12)) (text :flex-grow 1 :flex-shrink 1 :flex-basis '(200) :min-width '(180) :padding '(1 (12)) :border "#4E7890" :bgcolor "#D9EAF2" :face 'bold @@ -74,14 +74,14 @@ (defun etaf-resource-example--view (resource fail-next cleanup-count) "Return the example View for RESOURCE, FAIL-NEXT, and CLEANUP-COUNT." (etaf-view - (column :width '(680) :color "#252A2E" :bgcolor "#F8F5EE" + (box :layout 'column :width '(680) :color "#252A2E" :bgcolor "#F8F5EE" (expr :value (etaf-resource-example--header)) - (spacer :height 1) + (box :height 1) (expr :value (etaf-resource-example--status resource cleanup-count)) - (spacer :height 1) + (box :height 1) (expr :value (etaf-resource-example--actions resource fail-next)) - (spacer :height 1) + (box :height 1) (text :width '(680) :padding '(1 (16)) :border "#8D887F" :color "#4D5651" :bgcolor "#EEEAE2" "Scope rule: reload releases the old value; unmount releases the last one"))))