anchor.diff:  init(Args) ->
       {ok, Args}.
   
  -handle_call(test, _From, State) ->
  +handle_call({fetch, Screen_name}, _From, State) ->
       Consumer_key = proplists:get_value(consumer_key, State),
       Access_token = proplists:get_value(access_token, State),
       Consumer_secret = proplists:get_value(consumer_secret, State),
       Access_token_secret = proplists:get_value(access_token_secret, State),
  -    {reply, request(Consumer_key, Access_token, Consumer_secret, Access_token_secret), State};
  +    {reply, request(Consumer_key, Access_token, Consumer_secret, Access_token_secret, Screen_name), State};
   handle_call(_Request, _From, State) ->
       {reply, ok, State}.
   
  
positive.code: start_link(Params) ->
      gen_server:start_link({local, ?SERVER}, ?MODULE, Params, []).
  
  test_fetch() ->
      gen_server:call(?MODULE, test).
  
  
  %% ------------------------------------------------------------------
  
negative.code: -export([init/1, handle_call/3, handle_cast/2, handle_info/2,
           terminate/2, code_change/3]).
  
  %% ------------------------------------------------------------------
  %% API Function Definitions
  %% ------------------------------------------------------------------
  