anchor.diff:  handshake_other_started(OldHsData) when element(1,OldHsData) =:= hs_data ->
       handshake_other_started(convert_old_hsdata(OldHsData)).
   
  -
  -%%
  -%% check if connecting node is allowed to connect
  -%% with allow-node-scheme
  -%%
  -is_allowed(#hs_data{other_node = Node, 
  -		    allowed = Allowed} = HSData) ->
  -    case lists:member(Node, Allowed) of
  -	false when Allowed =/= [] ->
  -	    send_status(HSData, not_allowed),
  -	    error_msg("** Connection attempt from "
  -		      "disallowed node ~w ** ~n", [Node]),
  -	    ?shutdown2(Node, {is_allowed, not_allowed});
  -	_ -> true
  -    end.
   
   %%
   %% Check mandatory flags...
  
positive.code:          strict_order_flags/0,
  	 start_timer/1, setup_timer/2, 
  	 reset_timer/1, cancel_timer/1,
  	 shutdown/3, shutdown/4]).
  
  -import(error_logger,[error_msg/2]).
  
negative.code:                              reject_flags=RejFlgs,
                               require_flags=ReqFlgs},
      check_dflags(HSData, EDF),
      ?debug({"MD5 connection from ~p (V~p)~n",
  	    [Node, HSData#hs_data.other_version]}),
      mark_pending(HSData),
  