urbit/pkg/arvo/mar/html.hoon
2020-05-06 01:09:35 -04:00

24 lines
692 B
Plaintext

::
:::: /hoon/html/mar
::
/? 310
::
:::: compute
::
=, html
^|
|_ htm/@t
++ grow :: convert to
^?
|% ::
++ mime [/text/html (met 3 htm) htm] :: to %mime
++ hymn (need (de-xml htm)) :: to %hymn
-- ::
++ grab ^?
|% :: convert from
++ noun @t :: clam from %noun
++ mime |=({p/mite q/octs} q.q) :: retrieve form $mime
--
++ grad %mime
--