anchor.diff:  reformat(Events, EH) ->
       ct_test_support:reformat(Events, EH).
   
  +
  +telnet_config(unix_telnet) ->
  +    {unix, ct:get_config(unix)};
  +telnet_config(_) ->
  +    {unix,[{telnet,"localhost"},
  +	   {port, ?erl_telnet_server_port},
  +	   {username,?erl_telnet_server_user},
  +	   {password,?erl_telnet_server_pwd},
  +	   {keep_alive,true}]}.
  +
   %%%-----------------------------------------------------------------
   %%% TEST EVENTS
   %%%-----------------------------------------------------------------
  -events_to_check(default,Config) ->
  +events_to_check(unix_telnet,Config) ->
       all_cases(ct_telnet_basic_SUITE,Config);
   events_to_check(own_server,Config) ->
       all_cases(ct_telnet_own_server_SUITE,Config).
  
positive.code: 
  all() ->
      [
       default
      ].
  
  %%--------------------------------------------------------------------
  
negative.code: 
  %%%-----------------------------------------------------------------
  %%%
  unix_telnet(Config) when is_list(Config) ->
      all_tests_in_suite(unix_telnet,"ct_telnet_basic_SUITE","telnet.cfg",Config).
  
  own_server(Config) ->
      all_tests_in_suite(own_server,"ct_telnet_own_server_SUITE",
  		       "telnet2.cfg",Config).
  
  %%%-----------------------------------------------------------------
  %%% HELP FUNCTIONS
  %%%-----------------------------------------------------------------
  
  all_tests_in_suite(TestCase, SuiteName, CfgFileName, Config) ->
      DataDir = ?config(data_dir, Config),
      Suite = filename:join(DataDir, SuiteName),
      CfgFile = filename:join(DataDir, CfgFileName),
      Cfg = telnet_config(TestCase),
      ok = file:write_file(CfgFile, io_lib:write(Cfg) ++ "."),
      {Opts,ERPid} = setup([{suite,Suite},
  			  {label,TestCase},
  			  {config,CfgFile}],
  			 Config),
      ok = execute(TestCase, Opts, ERPid, Config).
  
  setup(Test, Config) ->
      Opts0 = ct_test_support:get_opts(Config),
  