anchor.diff:  -module(tracker_delegate).
   -behaviour(gen_server).
  +
  +-export([start_link/1, request_tracker_immediately/1]).
   
   -export([init/1, handle_cast/2, code_change/3, terminate/2, handle_info/2, handle_call/3]).
   
  
positive.code: handle_call(_Call, _Who, S) ->
      {noreply, S}.
  
  tick_after(Secs) ->
      timer:apply_after(Secs * 1000, self(),
  		      fun () -> request_tracker_immediately(self()) end, []).
  
  handle_cast(tracker_request_now, State) ->
      tracker_request(State, none);
  
negative.code: handle_cast(stop, State) ->
      tracker_request(State, "stopped").
  
  %% Internal stuff
  tick_after(Secs) ->
      timer:apply_after(Secs * 1000, self(),
  		      fun () -> request_tracker_immediately(self()) end, []).
  
  build_request_to_send(StatePid) ->
      {data_transfer_amounts, Uploaded, Downloaded, Left} =
  	torrent_state:current_state(StatePid),
  