twitter: Update API url.
parent
422ccf9901
commit
bc651331bb
|
@ -22,7 +22,7 @@ twitter-source [ "factor" ] initialize
|
||||||
|
|
||||||
: twitter-url ( string -- string' )
|
: twitter-url ( string -- string' )
|
||||||
ssl-supported?
|
ssl-supported?
|
||||||
"https://twitter.com/" "http://twitter.com/" ? prepend ;
|
"https://api.twitter.com/" "http://api.twitter.com/" ? prepend ;
|
||||||
|
|
||||||
PRIVATE>
|
PRIVATE>
|
||||||
|
|
||||||
|
@ -54,7 +54,7 @@ MACRO: keys-boa ( keys class -- )
|
||||||
|
|
||||||
! Twitter requests
|
! Twitter requests
|
||||||
: status-url ( string -- url )
|
: status-url ( string -- url )
|
||||||
"statuses/" ".json" surround twitter-url ;
|
"1.1/statuses/" ".json" surround twitter-url ;
|
||||||
|
|
||||||
: set-request-twitter-auth ( request -- request )
|
: set-request-twitter-auth ( request -- request )
|
||||||
[ <oauth-request-params> set-oauth ] with-twitter-oauth ;
|
[ <oauth-request-params> set-oauth ] with-twitter-oauth ;
|
||||||
|
|
Loading…
Reference in New Issue