urbit/base/mar/hook/door.hook

29 lines
679 B
Plaintext
Raw Normal View History

::
:::: /hook/door/hook/mar
::
/? 314
2015-02-27 09:35:41 +03:00
!:
|_ own=@t
::
++ grow :: convert to
|%
2014-09-30 01:56:09 +04:00
++ mime [/text/hoon (taco own)] :: convert to %mime
++ psal ;div:(pre:"{(trip own)}") :: convert to %html
++ hymn ;html:(head:title:"Source" "+{psal}")
++ txt (lore (cat 3 own '\0a'))
--
2015-02-27 09:35:41 +03:00
++ grab
|% :: convert from
++ mime |=([p=mite q=octs] q.q)
++ noun ,@t :: clam from %noun
++ txt
|= wan=wain
=+ (role wan)
(end 3 (dec (met 3 -)) -)
--
++ grad
|%
++ sted %txt
--
--