=================================================================== RCS file: /cvs/trango/Net-Telnet-Trango/t/59-network-cleanup.t,v retrieving revision 1.2 retrieving revision 1.3 diff -u -r1.2 -r1.3 --- trango/Net-Telnet-Trango/t/59-network-cleanup.t 2007/02/06 20:44:43 1.2 +++ trango/Net-Telnet-Trango/t/59-network-cleanup.t 2007/02/06 20:59:10 1.3 @@ -1,5 +1,5 @@ #!perl -T -# $RedRiver: 59-network-cleanup.t,v 1.1 2007/02/06 18:59:58 andrew Exp $ +# $RedRiver: 59-network-cleanup.t,v 1.2 2007/02/06 20:44:43 andrew Exp $ use Test::More tests => 25; use File::Spec; @@ -8,8 +8,7 @@ use_ok( 'Net::Telnet::Trango' ); } -diag("Testing Net::Telnet::Trango $Net::Telnet::Trango::VERSION, Perl $], $^X"); -diag(" Cleanup settings from other tests"); +diag("59: Cleanup settings from other tests"); my $cfg_file = File::Spec->catfile('t', 'tests.cfg');