anchor.diff:  start_relay_node(Node, Args) ->
       Pa = filename:dirname(code:which(?MODULE)),
       Cookie = "NOT"++atom_to_list(erlang:get_cookie()),
  -    {ok, LSock} = gen_tcp:listen(0, [binary, {packet, 4}, 
  -                                     {active, false}]),
  +    {ok, LSock} = gen_tcp:listen(0, [binary, {packet, 4}, {active, false}]),
       {ok, Port} = inet:port(LSock),
       {ok, Host} = inet:gethostname(),
       RunArg = "-run " ++ atom_to_list(?MODULE) ++ " inet_rpc_server " ++
       Host ++ " " ++ integer_to_list(Port),
  -    {ok, NN} = 
  -    test_server:start_node(Node, peer, 
  -                           [{args, Args ++
  -                             " -setcookie "++Cookie++" -pa "++Pa++" "++
  -                             RunArg}]),
  +    {ok, NN} = test_server:start_node(Node, peer,
  +                                      [{args, Args ++
  +                                        " -setcookie "++Cookie++" -pa "++Pa++" "++
  +                                        RunArg}]),
       [N,H] = string:tokens(atom_to_list(NN),"@"),
       {ok, Sock} = gen_tcp:accept(LSock),
       pang = net_adm:ping(NN),
  
positive.code:                  [] -> [];
                   _ -> [{erl,[{release,Rel}]}]
               end,
      test_server:start_node(Name, slave, 
                             [{args,
                               Args++" -setcookie "++Cookie++" -pa \""++Pa++"\""}
                              | RelArg]);
  
negative.code:     [{ct_hooks,[ts_install_cth]},
       {timetrap, {minutes, 4}}].
  
  all() ->
      [ping, {group, bulk_send}, {group, local_send},
       link_to_busy, exit_to_busy, lost_exit, link_to_dead,
       link_to_dead_new_node, applied_monitor_node,
  