=================================================================== RCS file: /cvs/trango/Net-Telnet-Trango/t/54-network-ap-su.t,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- trango/Net-Telnet-Trango/t/54-network-ap-su.t 2007/02/06 19:17:26 1.3 +++ trango/Net-Telnet-Trango/t/54-network-ap-su.t 2007/02/06 20:59:10 1.4 @@ -1,5 +1,5 @@ #!perl -T -# $RedRiver: 54-network-ap-su.t,v 1.2 2007/02/06 19:10:48 andrew Exp $ +# $RedRiver: 54-network-ap-su.t,v 1.3 2007/02/06 19:17:26 andrew Exp $ use Test::More tests => 37; use File::Spec; @@ -8,8 +8,7 @@ use_ok( 'Net::Telnet::Trango' ); } -diag("Testing Net::Telnet::Trango $Net::Telnet::Trango::VERSION, Perl $], $^X"); -diag(" Tests that run on both APs and SUs associated or not"); +diag("54: Tests that run on both APs and SUs associated or not"); my $cfg_file = File::Spec->catfile('t', 'tests.cfg');