dougm 01/07/06 13:46:20 Modified: t/net/perl sym.pl Log: shutup Test::Harness warning: "Test header seen twice!" Revision Changes Path 1.2 +1 -1 modperl/t/net/perl/sym.pl Index: sym.pl =================================================================== RCS file: /home/cvs/modperl/t/net/perl/sym.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- sym.pl 1998/02/10 21:36:24 1.1 +++ sym.pl 2001/07/06 20:46:19 1.2 @@ -16,7 +16,7 @@ my $num = $r->args; $r->send_http_header("text/plain"); -print "1..2\n"; +print "1..2\n" if $num == 1; print "ok $num\n"; delete $Apache::Registry->{+__PACKAGE__};