fix :mark-dashboard for zuse changes

This commit is contained in:
Anton Dyudin 2017-02-13 14:57:07 -08:00
parent 21ce58d6f1
commit f602294a2c

View File

@ -1,22 +1,22 @@
|%
++ results (map mark (each vase tang))
++ show-results
=, js:eyre
=, format
|= a/results ^- json
:- %o
%- ~(run by a)
|= b/(each vase tang)
?- -.b
$& (jape (text p.b))
$| (jape (of-wall (wush 160 (flop p.b))))
$& (tape:enjs (text p.b))
$| (tape:enjs (of-wall (wush 160 (flop p.b))))
==
++ wush
|= {wid/@u tan/tang} ^- wall
(zing (turn tan |=(a/tank (wash 0^wid a))))
--
::
=, ^gall
=, ^ford
=, gall
=, ford
|_ {bowl $~}
++ peek _~
++ peer-scry-x