=================================================================== RCS file: /cvs/trango/Net-Telnet-Trango/t/56-network-su.t,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- trango/Net-Telnet-Trango/t/56-network-su.t 2007/02/06 18:57:14 1.1 +++ trango/Net-Telnet-Trango/t/56-network-su.t 2007/02/06 20:59:10 1.2 @@ -1,5 +1,5 @@ #!perl -T -# $RedRiver: 55-network-add_su-su.t,v 1.3 2007/02/06 17:46:55 andrew Exp $ +# $RedRiver: 56-network-su.t,v 1.1 2007/02/06 18:57:14 andrew Exp $ use Test::More tests => 7; use File::Spec; @@ -8,8 +8,7 @@ use_ok( 'Net::Telnet::Trango' ); } -diag("Testing Net::Telnet::Trango $Net::Telnet::Trango::VERSION, Perl $], $^X"); -diag(" SU tests"); +diag("56: SU tests"); my $cfg_file = File::Spec->catfile('t', 'tests.cfg');