cvs commit: modperl/t/net/perl sym.pl

[dougm]

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__};