shrub/gen/twit/feed.hoon
Anton Dyudin ff518453ef flip generator default arguments to end of ?()s
tracking a change in bunt semantics
2017-11-27 16:43:09 -08:00

21 lines
430 B
Plaintext

:: Display twitter feed
::
:::: /hoon/feed/twit/gen
::
/? 310
/- twitter
/+ old-zuse
=, old-zuse
::
:::: ~fyr
::
:- %say
|= $: {now/@da eny/@uvJ bek/beak}
{{who/iden $~} typ/?($user $home)}
==
=+ pax=/(scot %p p.bek)/twit/(scot %da now)/[typ]/[who]
:- %tang
%+ turn (flop .^((list post:twitter) %gx pax))
|= post:twitter ^- tank
rose+[": " `~]^~[leaf+"{<now>} @{(trip who)}" leaf+(trip txt)]