2016-03-31 03:02:52 +03:00
|
|
|
:: Twitter credentials
|
|
|
|
|
::
|
|
|
|
|
:::: /hoon/cred/twit/mar
|
|
|
|
|
::
|
|
|
|
|
/- plan-acct
|
2017-02-14 03:02:25 +03:00
|
|
|
/+ httr-to-json, twitter, old-zuse
|
|
|
|
|
=, old-zuse
|
2016-03-31 03:02:52 +03:00
|
|
|
|_ {acc/plan-acct raw/json}
|
|
|
|
|
++ grab
|
|
|
|
|
|%
|
|
|
|
|
++ noun {plan-acct ^json}
|
|
|
|
|
++ httr (cork httr-to-json json) :: XX mark translation
|
|
|
|
|
++ json
|
|
|
|
|
|= jon/^json ^- {plan-acct ^json}
|
|
|
|
|
=+ usr=(need ((ot 'screen_name'^so ~):jo jon))
|
2016-04-01 02:15:10 +03:00
|
|
|
=+ url=(user-url:render:twitter usr)
|
2016-04-01 03:39:48 +03:00
|
|
|
[[usr (some url)] jon]
|
2016-03-31 03:02:52 +03:00
|
|
|
--
|
|
|
|
|
++ grow
|
|
|
|
|
|%
|
2016-04-01 02:15:10 +03:00
|
|
|
++ tank >[+<.+]<
|
2016-03-31 03:02:52 +03:00
|
|
|
--
|
|
|
|
|
--
|
