anchor.diff:  			% end;
   		{tcp_closed,_} ->
   			ok;
  -		{isolated,_Nd,I} ->
  +		{isolated,Nd,I} when P#dp.connected_to == Nd ->
   			lager:info("Isolation=~p, for con=~p, direction=~p",[I,P#dp.connected_to,P#dp.direction]),
  -			P#dp{isolated = I};
  +			loop(P#dp{isolated = I});
  +		{isolated,_,_} ->
  +			loop(P);
   		{isolated,I} ->
   			lager:info("Isolation=~p, for con=~p, direction=~p",
   				[I,P#dp.connected_to,P#dp.direction]),
  
positive.code: 			_ ->
  				loop(P, ToSend, HaveSent, 0)
  		end;
  	{isolated,_Nd,I} ->
  		lager:info("Isolation=~p, for con=~p, direction=~p",[I,P#dp.connected_to,P#dp.direction]),
  		loop(P#dp{isolated = I}, ToSend, HaveSent, 0);
  	{isolated,I} ->
  		lager:info("Isolation=~p, for con=~p, direction=~p",
  			[I,P#dp.connected_to,P#dp.direction]),
  
negative.code: 	receive
  		{tcp,_S,_Bin} ->
  			loop(P);
  		{isolated,Nd,I} when P#dp.connected_to == Nd ->
  			loop(P#dp{isolated = I});
  		{isolated,_,_} ->
  			loop(P);
  		{isolated,I} ->
  			loop(P#dp{isolated = I})
  	end;
  