mirror of
https://github.com/urbit/shrub.git
synced 2024-12-30 15:44:03 +03:00
22 lines
685 B
Plaintext
22 lines
685 B
Plaintext
|
::
|
||
|
:::: /hoon/xml/mar
|
||
|
::
|
||
|
/? 310
|
||
|
::
|
||
|
:::: compute
|
||
|
::
|
||
|
=, mimes:html
|
||
|
=, html
|
||
|
|_ xml=@t
|
||
|
::
|
||
|
++ grad %mime
|
||
|
++ grow :: convert to
|
||
|
|% ::
|
||
|
++ mime [/application/xml (as-octs xml)] :: to %mime
|
||
|
++ hymn (need (de-xml xml)) :: to %hymn
|
||
|
-- ::
|
||
|
++ grab |% :: convert from
|
||
|
++ noun @t :: clam from %noun
|
||
|
++ mime |=([p=mite q=octs] q.q) :: retrieve form %mime
|
||
|
-- --
|