urbit/main/app/tweet/core.hook

/+    sh-utils
!:
|_  [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
  (args-into-gate . |=([@ @ a=@da @] tang/~[leaf/"Tweet recieved {<a>}"]))
++  pour  |*([ost=@ * sih=[@ ^]] :_(+>.$ [ost %give +.sih]~))
--
Twitter daemon v1: auth, tweeting 2015-01-22 06:31:17 +03:00			`/+ sh-utils`
			`!:`
			`\|_ [hide ~]`
Tweet ids, subscription to listen on progress 2015-01-23 22:42:57 +03:00			++ peer ,_`.
			`++ poke--args`
			`%+ add-subs [[our /twit] our /post/(scot %uv eny)]`
Added discrimination per commanding twitter user 2015-01-27 06:43:38 +03:00			`%^ gate-mess .`
			`\|=([a=span b=cord ~] [/twit %twit-do !>([a %post eny b])])`
Tweet ids, subscription to listen on progress 2015-01-23 22:42:57 +03:00			,_`.
Cache statuses 2015-01-25 04:48:41 +03:00			`++ posh-twit-stat`
			`(args-into-gate . \|=([@ @ a=@da @] tang/~[leaf/"Tweet recieved {<a>}"]))`
Twitter daemon v1: auth, tweeting 2015-01-22 06:31:17 +03:00			`++ pour \|([ost=@ sih=[@ ^]] :_(+>.$ [ost %give +.sih]~))`
Cache statuses 2015-01-25 04:48:41 +03:00			`--`