giles
4f02f82f4e
Parser: skip unit suffix when next ident is a comparison keyword (starts, ends, contains, matches, is, does, in, precedes, follows). Fixes "123 starts with '12'" returning "123starts" instead of true. eval-hs: use hs-compile directly instead of hs-to-sx-from-source with "return " prefix, which was causing the parser to consume the comparison as a string suffix. Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
18 lines
959 B
Plaintext
18 lines
959 B
Plaintext
(defcomp
|
|
()
|
|
(~examples/page-content
|
|
:title "Bulk Update"
|
|
:description "Select rows with checkboxes and use Activate/Deactivate buttons. sx-include gathers checkbox values from the form."
|
|
:demo-description "Check some rows, then click Activate or Deactivate."
|
|
:demo (~examples/bulk-update-demo
|
|
:users (list
|
|
(list "1" "Alice Chen" "alice@example.com" "active")
|
|
(list "2" "Bob Rivera" "bob@example.com" "inactive")
|
|
(list "3" "Carol Zhang" "carol@example.com" "active")
|
|
(list "4" "Dan Okafor" "dan@example.com" "inactive")
|
|
(list "5" "Eve Larsson" "eve@example.com" "active")))
|
|
:sx-code "(button\n :sx-post \"/sx/(geography.(hypermedia.(example.(api.bulk))))?action=activate\"\n :sx-target \"#bulk-table\"\n :sx-swap \"innerHTML\"\n :sx-include \"#bulk-form\"\n \"Activate\")"
|
|
:handler-names (list "ex-bulk")
|
|
:comp-placeholder-id "bulk-comp"
|
|
:wire-placeholder-id "bulk-wire"))
|