spider: fix mark validation

glob is succesfully downloaded and inserted into the docket state, but
as an octet stream. need to define the correct marks.
This commit is contained in:
ryjm 2021-09-27 02:43:34 -04:00
parent 035b29f0c0
commit 098587bf8b
2 changed files with 4 additions and 4 deletions

View File

@ -405,8 +405,8 @@
=: starting.state (~(put by starting.state) yarn [%build vase])
tid.state (~(put by tid.state) new-tid yarn)
serving.state
?. (~(has by serving.state) yrn) serving.state
(~(put by serving.state) yarn)
?. (~(has by serving.state) new-tid) serving.state
(~(put by serving.state) new-tid [~ %noun q.beak])
==
=/ pax=path
~| no-file-for-thread+file
@ -476,7 +476,7 @@
^- (quip card ^state)
=/ m (strand ,vase)
?. (has-yarn running.state yarn)
%- (slog leaf+"spider got input for non-existent {<yarn>} 2" ~)
%- (slog leaf+"spider got input for non-existent {<yarn>}" ~)
`state
=/ =eval-form:eval:m
thread-form:(need (get-yarn running.state yarn))

View File

@ -138,7 +138,7 @@
=/ res (mule |.((vale.dais in)))
?: ?=(%| -.res)
~|(%spider-mark-fail (mean leaf+"spider: ames vale fail {<mark>}" p.res))
p.res
[mark p.res]
::
:: Take a new sign and run the strand against it
::