fix json->txt type error, add ford ~|

This commit is contained in:
Anton Dyudin 2016-11-10 14:45:50 -08:00
parent c708786640
commit 62330a1759
2 changed files with 3 additions and 2 deletions

View File

@ -1136,6 +1136,7 @@
&((slob %grow p.pro) (slob too p:(slap pro [%limb %grow])))
:: ~$ link-grow
:: =< $ ~% %grow link-jet ~ |.
%+ cool |.(leaf+"ford: grow {<for>} to {<too>}")
%+ cope (keel cof pro [[%& 6]~ vax]~)
|= {cof/cafe pox/vase}
(maim cof pox [%per [%limb %grow] [%limb too]])

View File

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