anchor.diff:  %%--------------------------------------------------------------------
   %% Connect to the ssh server of the OS
   sshd_simple_exec(Config) ->
  +    case ?config(tc_group_path,Config) of
  +        [[{name,public_key}]] -> ssh_dbg:ct_auth();
  +        _ -> ok
  +    end,
  +    ClientPubKeyOpts =
  +        case proplists:get_value(tag_alg,Config) of
  +            {public_key,Alg} -> [{pref_public_key_algs,[Alg]}];
  +            _ -> []
  +        end,
       ConnectionRef = ssh_test_lib:connect(22, [{silently_accept_hosts, true},
                                                 proplists:get_value(pref_algs,Config),
  -					      {user_interaction, false}]),
  +					      {user_interaction, false}
  +                                              | ClientPubKeyOpts]),
       {ok, ChannelId0} = ssh_connection:session_channel(ConnectionRef, infinity),
       success = ssh_connection:exec(ConnectionRef, ChannelId0,
   				  "echo testing", infinity),
  
positive.code:     Opts = pubkey_opts(Config),
      case {ssh_file:user_key(Alg,Opts), ssh_file:host_key(Alg,Opts)} of
          {{ok,_}, {ok,_}} ->
              ssh_dbg:ct_auth(),
              start_pubkey_daemon([proplists:get_value(pref_algs,Config)],
                                  [{extra_daemon,true}|Config]);
          {{ok,_}, _} ->
  
negative.code: 	    ssh_test_lib:receive_exec_result(Data0,
  					     ConnectionRef, ChannelId0);
  	Other0 ->
              catch ssh_dbg:stop(),
  	    ct:fail(Other0)
      end,
      
  