anchor.diff:       {et_work_dir, EtorrentWorkDir},
        {et_leech_file, EtorrentLeechFile},
        {tr_work_dir, TransMissionWorkDir},
  -     {tr_seed_file, TransMissionSeedFile} | Config].
  +     {tr_file, TransMissionFile} | Config].
   
   spawn_leecher(Config) ->
       CommonConf = ct:get_config(common_conf),
  
positive.code:     file:copy(SeedTorrent, LeechTorrent),
      ok = rpc:call(SN, etorrent, start_app, [SeedConfig]),
      ok = rpc:call(LN, etorrent, start_app, [LeechConfig]),
      [{sn, SN}, {ln, LN},
       {seed_torrent, SeedTorrent},
       {leech_torrent, LeechTorrent},
       {seed_file, SeedFile},
       {leech_file, LeechFile} | Config];
  
negative.code: stop_leecher(Config) ->
      ok = rpc:call(?config(leech_node, Config), etorrent, stop_app, []).
  
  stop_seeder(Config) ->
      ok = rpc:call(?config(seed_node, Config), etorrent, stop_app, []).
  
  end_per_testcase(leech_transmission, Config) ->
      stop_leecher(Config),
      ?line ok = file:delete(?config(tr_file, Config)),
      ?line ok = file:delete(?config(et_leech_file, Config));
  end_per_testcase(seed_transmission, Config) ->
      stop_seeder(Config),
      ?line ok = file:delete(?config(tr_file, Config));
  end_per_testcase(seed_leech, Config) ->
      stop_seeder(Config),
      stop_leecher(Config),
      ?line ok = file:delete(?config(et_leech_file, Config));
  end_per_testcase(_Case, _Config) ->
      ok.
  
  