debug/to support files

This commit is contained in:
Anton Dyudin 2015-03-13 16:44:46 -07:00
parent edaeb1959a
commit bf84060fde
2 changed files with 5 additions and 5 deletions

View File

@ -6,7 +6,7 @@
:::: /hook/core/test/app
::
/? 314 :: need urbit 314
/= front /:/%%/front:/hymn/ :: load front page
:: /= front /:/%%/front:/hymn/ :: load front page
::
:::: structures
::
@ -297,7 +297,7 @@
|= [ost=bone you=ship pax=path]
^- [(list move) _+>]
~& [%test-peer hid]
?~ pax [[ost %give %rust %hymn front]~ +>.$]
?~ pax !! ::[[ost %give %rust %hymn front]~ +>.$]
?: ?=(%tests -.pax)
[[ost %give %rust %json tests-json:et]~ +>.$]
:_ +>.$ :_ ~
@ -308,7 +308,7 @@
++ poke-json :: browser message
|= [ost=bone you=ship jon=json]
^- [(list move) _+>]
~& [%test-poke hid]
~& [%test-poke hid you]
=+ tes=((of [%test so] ~):jo jon)
?~ tes [[ost %give %mean ~ %strange-json ~]~ +>.$]
=+ tst=(~(get by tests) +.u.tes)

View File

@ -9,8 +9,8 @@
::
++ grow :: convert to
|%
++ mime :: convert to %mime
[/text/json (tact (pojo jon))]
++ mime [/text/json (taco txt)] :: convert to %mime
++ txt (crip (pojo jon))
--
++ grab |% :: convert from
++ noun json :: clam from %noun