anchor.diff:  	    end
       end;
   init_per_group(v4_connections, Config) ->
  -    [{listen_opts,  [{reuseaddr, true}]},
  +    [{tcp_listen_opts,  [{reuseaddr, true}]},
        {listen_host,  "localhost"},
  -     {connect_opts, []}
  +     {tcp_connect_opts, []}
        |  Config];
   init_per_group(v6_connections, Config) ->
       {ok, Hostname} = inet:gethostname(),
       case lists:member(list_to_atom(Hostname), ct:get_config(ipv6_hosts,[])) of
   	true -> 
  -	    [{listen_opts,  [inet6]},
  +	    [{tcp_listen_opts,  [inet6,{reuseaddr, true}]},
   	     {listen_host,  "::"},
  -	     {connect_opts, [{tcpopts,[inet6]}]}
  +	     {tcp_connect_opts, [{tcpopts,[inet6]}]}
   	     |  Config];
   	false -> 
   	    {skip, io_lib:format("~p is not an ipv6_host",[Hostname])}
  
positive.code: 	    Listener = spawn_link(
  			 fun() ->
  				 case ssl:listen(SSL_Port, [{certfile, CertFile},
  							    {keyfile, KeyFile},
  							    {reuseaddr, true}]) of
  				     {ok,SSL_LSock} ->
  					 Parent ! {ok,self()},
  					 (fun L() ->
  
negative.code: tcp_connection(Config) ->
      Host = proplists:get_value(listen_host, Config),
      Port = proplists:get_value(listen_port, Config),
      Opts = proplists:get_value(tcp_connect_opts, Config),
      case eldap:open([Host], [{port,Port}|Opts]) of
  	{ok,_H} ->
  	    Sl = proplists:get_value(listen_socket, Config),
  