anchor.diff:  			       {0, 0, 0, 0},
   			       peer)
   	  end),
  -    io:format("peer_stats: ~p~n", [{Seeders4, Leechers4, Seeders6, Leechers6}]),
  +    %io:format("peer_stats: ~p~n", [{Seeders4, Leechers4, Seeders6, Leechers6}]),
       collectd:set_gauge(peers, inet_seeders, [Seeders4]),
       collectd:set_gauge(peers, inet_leechers, [Leechers4]),
       collectd:set_gauge(peers, inet6_seeders, [Seeders6]),
  
positive.code: 					 upspeed = Upspeed,
  					 downspeed = Downspeed,
  					 last = Last } 
  		|| {Peerid, IP, Port, Downloaded, Uploaded, Left, Upspeed, Downspeed, Last} <- E ],
  	L.
  
  
  
negative.code: 		  fun(#peer{hash_peer = {_, PeerPeerId}}) ->
  			  PeerId =/= PeerPeerId
  		  end, AllPeers),
  		%%%%io:format("PeersWithoutMe: ~p~n", [PeersWithoutMe]),
  	    NeededPeers =
  		case Left of
  		    %% Nothing left: seeder
  