anchor.diff:      {_Server, Host, Port} = ssh_test_lib:std_daemon(Config, [{id_string,"Olle"}]),
       {ok,S1}=ssh_test_lib:gen_tcp_connect(Host,Port,[{active,false},{packet,line}]),
       {ok,"SSH-2.0-Olle\r\n"} = gen_tcp:recv(S1, 0, 2000).
  +
  +%%--------------------------------------------------------------------
  +id_string_own_string_server_trail_space(Config) ->
  +    {_Server, Host, Port} = ssh_test_lib:std_daemon(Config, [{id_string,"Olle "}]),
  +    {ok,S1}=ssh_test_lib:gen_tcp_connect(Host,Port,[{active,false},{packet,line}]),
  +    {ok,"SSH-2.0-Olle \r\n"} = gen_tcp:recv(S1, 0, 2000).
   
   %%--------------------------------------------------------------------
   id_string_random_server(Config) ->
  
positive.code:      hostkey_fingerprint_check_list,
       id_string_no_opt_client,
       id_string_own_string_client,
       id_string_random_client,
       id_string_no_opt_server,
       id_string_own_string_server,
       id_string_random_server,
       {group, hardening_tests}
      ].
  
negative.code:     end.
  
  %%--------------------------------------------------------------------
  id_string_own_string_client_trail_space(Config) ->
      {Server, _Host, Port} = fake_daemon(Config),
      {error,_} = ssh:connect("localhost", Port, [{id_string,"Pelle "}], 1000),
      receive
  	{id,Server,"SSH-2.0-Pelle \r\n"} ->
  	    ok;
  	{id,Server,Other} ->
  	    ct:fail("Unexpected id: ~s.",[Other])
      after 5000 ->
  	    {fail,timeout}
      end.
  
  %%--------------------------------------------------------------------
  id_string_random_client(Config) ->
      {Server, _Host, Port} = fake_daemon(Config),
      {error,_} = ssh:connect("localhost", Port, [{id_string,random}], 1000),
  