naoya_t@hatenablog

いわゆるチラシノウラであります

自分で作ったリストに自分自身を追加したい→UIがないならAPIを叩けばいいじゃない

タイトルの通り。

ここから先は結局のところ自作ライブラリでの実験(+改造)メモです

-module(add_myself).
-export([start/0]).

-include("twitter.hrl").

start() ->
    % erl -pa ebin -s crypto -s inets
	crypto:start(),
	inets:start(),
	ssl:start(),

	Pid = twitter:start(#twitter_params{
	  username            = "MY_SCREENNAME",
	  password            = "*****",
	  consumer_key        = "CONSUMER_KEY",
	  consumer_secret     = "CONSUMER_SECRET",
	  access_token        = "ACCESS_TOKEN",
	  access_token_secret = "ACCESS_TOKEN_SECRET"}),

    Params = [{"slug", "LIST_NAME"}, {"owner_screen_name", "MY_SCREEN_NAME"}, {"screen_name", "MY_SCREENNAME"}],

twitter_api.erlに追加

lists(Pid, Params) ->
  twitter:get(Pid, "https://api.twitter.com/1/lists.json", Params).

lists_members_create(Pid, Params) ->
  % list_id | slug + owner_screen_name | slug + owner_id
  % user_id | screen_name
  twitter:post(Pid, "https://api.twitter.com/1/lists/members/create.json", Params).
$ erlc twitter_api.erl
$ erlc add_myself.erl
$ erl -noshell -s add_myself -s init stop