anchor.diff:      case eldap:open([Host],[{port,Port},{ssl,UseSSL}]) of
   	{ok,H} when UseSSL==false, Ss=/=[] ->
   	    case eldap:start_tls(H,[]) of
  -		ok -> 
  +		ok ->
   		    ct:log("find_first_server ~p UseSSL=~p -> ok",[{Host,Port},UseSSL]),
   		    eldap:close(H),
   		    {Host,Port};
  
positive.code: 		     #eldap_search{base = BasePath,
  				   filter = eldap:substrings("sn", [{any, "a"}]),
  				   scope = eldap:singleLevel()}).
      
  %%%----------------------------------------------------------------
  modify_dn_keep_old(Config) ->
      H = ?config(handle, Config),
  
negative.code:     try ssl:start()
      of
  	R when R==ok ; R=={error,{already_started,ssl}} ->
  	    try make_certs:all("/dev/null",
  			       filename:join(?config(data_dir,Config), "certs"))
  	    of
  		{ok,_} -> true;
  		Other ->
  		    ct:comment("make_certs failed"),
  		    ct:log("make_certs failed ~p", [Other]),
  		    false
  	    catch
  		C:E ->
  		    ct:comment("make_certs crashed"),
  		    ct:log("make_certs failed ~p:~p", [C,E]),
  		    false
  