urbit/pkg/base-dev/mar/xml.hoon
2021-08-10 16:13:27 +03:00

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
-- --