urbit/gen/twit/tweet.hoon

14 lines
367 B
Plaintext
Raw Normal View History

/+ sh-utils
!:
2015-12-15 03:45:52 +03:00
|_ {hide $~}
++ peer _`.
++ poke--args
%+ add-subs [[our /twit] our /post/(scot %uv eny)]
%^ gate-mess .
|=([a=span b=cord ~] [/twit %twit-do !>([a %post eny b])])
,_`.
++ posh-twit-stat
2015-12-15 03:45:52 +03:00
(args-into-gate . |=({@ @ a+@da @} tang/~[leaf/"tweet received {<a>}"]))
++ pour |*({ost+@ * sih+{@ ^}} :_(+>.$ [ost %give +.sih]~))
--