anchor.diff:  %% ------------------------------------------------------------------
   
   start_stream(Username, Password, UserId) when is_integer(UserId) ->
  -    Url = "https://stream.twitter.com/1/statuses/filter.json?follow=" ++ integer_to_list(UserId),
  +    Url = "https://stream.twitter.com/1/statuses/filter.json?follow="
  +        ++ integer_to_list(UserId),
       Headers = [twitterlinks_misc:http_auth_header(basic, Username, Password)],
   
       io:format("Starting Stream ~s ~p ~n", [Url, Headers]),
  
positive.code: %% ------------------------------------------------------------------
  
  -export([start_link/4, create/4, start_stream/3]).
  -record(state, {account_id, request_id, user_id}).
  
  %% ------------------------------------------------------------------
  %% gen_server Function Exports
  
negative.code: %% ------------------------------------------------------------------
  
  init([AccountId, Username, Password, UserId]) ->
      {ok, #state{account_id=AccountId, user_id=UserId,
                  username=Username, password=Password}, 0}.
  
  handle_call(_Msg, _From, State) ->
      {noreply, State}.
  