anchor.diff:  	    Stat = list_to_atom(StrStat),
   	    ?debug({dist_util,self(),recv_status, Node, Stat}),
   	    case Stat of
  -		not_allowed -> ?shutdown(Node);
  +		not_allowed -> ?shutdown2(Node, {recv_status_failed, not_allowed});
   		nok  -> 
   		    %% wait to be killed by net_kernel
   		    receive
  
positive.code: 	    setup_timer(Pid, Timeout)
      after Timeout ->
  	    ?trace("Timer expires ~p, ~p~n",[Pid, Timeout]),
  	    ?shutdown(timer)
      end.
  
  reset_timer(Timer) ->
  
negative.code: 			   [Node, Challenge,Version]),
  		    {Flags,Challenge};
  		_ ->
  		    ?shutdown2(no_node, {recv_challenge_failed, no_node, Ns})
  	    catch
  		error:badarg ->
  		    ?shutdown2(no_node, {recv_challenge_failed, no_node, Ns})
  	    end;
  	Other ->
  	    ?shutdown2(no_node, {recv_challenge_failed, Other})
      end.
  
  
  