2015-08-12 00:31:16 +03:00
|
|
|
/+ tree, react
|
2015-12-22 04:29:47 +03:00
|
|
|
/= mime /mime/
|
|
|
|
|
/= body /elem/
|
|
|
|
|
/= snip /snip/
|
|
|
|
|
/= meta /front/
|
|
|
|
|
/= sect /index/
|
2015-08-12 00:31:16 +03:00
|
|
|
!:
|
2015-08-04 02:49:34 +03:00
|
|
|
^- tree-include
|
2015-09-02 03:24:18 +03:00
|
|
|
=+ rj=react-to-json:react
|
2015-08-12 00:31:16 +03:00
|
|
|
=+ fj=|=(atr=(map span span) [%o (~(run by atr) |=(a=span s/a))])
|
2015-09-02 03:24:18 +03:00
|
|
|
=+ ij=(map-to-json:tree |=(a=path (crip (spud a))) |=(a=marl [%a (turn a rj)]))
|
2015-12-09 05:23:02 +03:00
|
|
|
[mime (rj body) (rj /h1 hed.snip) (rj /div tal.snip) (fj meta) (ij sect)]
|
