HS: cookies iteration via host-iter? before dict? (+1 test)
Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
@@ -4974,7 +4974,17 @@
|
||||
(eval-hs "set cookies.foo to 'bar'")
|
||||
(assert= (eval-hs "cookies.foo") "bar"))
|
||||
(deftest "iterate cookies values work"
|
||||
(error "SKIP (untranslated): iterate cookies values work"))
|
||||
(hs-cleanup!)
|
||||
(host-set! (host-global "cookies") "foo" "bar")
|
||||
(let ((_names (list)) (_values (list)))
|
||||
(hs-for-each
|
||||
(fn (x)
|
||||
(append! _names (host-get x "name"))
|
||||
(append! _values (host-get x "value")))
|
||||
(host-global "cookies"))
|
||||
(assert-contains "foo" _names)
|
||||
(assert-contains "bar" _values))
|
||||
)
|
||||
(deftest "length is 0 when no cookies are set"
|
||||
(hs-cleanup!)
|
||||
(assert= (eval-hs "cookies.length") 0))
|
||||
|
||||
Reference in New Issue
Block a user