=================================================================== RCS file: /cvs/trango/Net-Telnet-Trango/t/53-network-add_su-ap-su.t,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- trango/Net-Telnet-Trango/t/53-network-add_su-ap-su.t 2007/02/06 20:42:40 1.3 +++ trango/Net-Telnet-Trango/t/53-network-add_su-ap-su.t 2007/02/06 20:59:10 1.4 @@ -1,5 +1,5 @@ #!perl -T -# $RedRiver: 53-network-add_su-ap-su.t,v 1.2 2007/02/06 17:40:36 andrew Exp $ +# $RedRiver: 53-network-add_su-ap-su.t,v 1.3 2007/02/06 20:42:40 andrew Exp $ use Test::More tests => 17; use File::Spec; @@ -8,8 +8,7 @@ use_ok( 'Net::Telnet::Trango' ); } -diag("Testing Net::Telnet::Trango $Net::Telnet::Trango::VERSION, Perl $], $^X"); -diag(" AP tests when adding an SU to an AP and the SU should associate"); +diag("53: AP tests when adding an SU to an AP and the SU should associate"); my $cfg_file = File::Spec->catfile('t', 'tests.cfg'); my ($cir, $mir) = (128, 256);