anchor.diff:          true ->
               case etorrent_rate_mgr:fetch_send_rate(Id, Pid) of
                   none -> none;
  -                Rate -> {seeding, Rate}
  +                Rate -> {seeding, -Rate} % Negative rate so keysort works
               end;
           false ->
               case etorrent_rate_mgr:fetch_recv_rate(Id, Pid) of
                   none -> none;
  -                Rate -> {leeching, -Rate}
  +                Rate -> {leeching, -Rate} % Negative rate so keysort works
               end
       end.
   
  
positive.code: 
  split_preferred(Peers) ->
      {Downs, Leechs} = split_preferred_peers(Peers, [], []),
      {lists:keysort(#rechoke_info.rate, Downs),
       lists:keysort(#rechoke_info.rate, Leechs)}.
  
  
negative.code:                                     pid = Pid,
                                      peer_state = PeerState,
                                      state = State,
                                      rate = R,
                                      r_interest_state = proplists:get_value(interest_state, St),
                                      r_choke_state    = proplists:get_value(choke_state, St),
                                      l_choke          = proplists:get_value(local_choke, St),
  