HS: fix hs-query-all to return proper SX list
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 46s

host-to-list returned a plain JS array not recognized as SX list by
the OCaml kernel, so for-each silently skipped it. Use dom-query-all
which builds a proper SX list via append!. Fixes all 14 take failures.

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
2026-05-02 09:51:00 +00:00
parent 7990ee5ffe
commit df6480cd96

View File

@@ -763,7 +763,7 @@
(sel)
(do
(host-set! (host-global "window") "_hs_last_query_sel" sel)
(host-to-list (host-call (dom-body) "querySelectorAll" sel)))))
(dom-query-all (dom-document) sel))))
;; Array slicing (inclusive both ends)
(define
hs-query-all-in