anchor.diff:  		_ ->
   		    error_msg("** Connection attempt to "
   			      "disallowed node ~w ** ~n", [NodeB]),
  -		    ?shutdown(NodeB)
  +		    ?shutdown2(NodeB, {recv_challenge_ack_failed, bad_cookie})
   	    end;
  -	_ ->
  -	    ?shutdown(NodeB)
  +	Other ->
  +	    ?shutdown2(NodeB, {recv_challenge_ack_failed, Other})
       end.
   
   recv_status(#hs_data{kernel_pid = Kernel, socket = Socket, 
  
positive.code: 	    error_msg("** ~w: Connection attempt ~s node ~w ~s "
  		      "since it cannot handle extended ~s. "
  		      "**~n", [node(), Dir, Node, How, What]),
  	    ?shutdown(Node)
      end.
  
  
  
negative.code: 	    Stat = list_to_atom(StrStat),
  	    ?debug({dist_util,self(),recv_status, Node, Stat}),
  	    case Stat of
  		not_allowed -> ?shutdown2(Node, {recv_status_failed, not_allowed});
  		nok  -> 
  		    %% wait to be killed by net_kernel
  		    receive
  