http-webtest-commits

[Ilya M. <m_...@us...>]

Update of /cvsroot/http-webtest/HTTP-WebTest/t
In directory usw-pr-cvs1:/tmp/cvs-serv31431/t

Modified Files:
	10-click.t 
Log Message:
Minor test fixes


Index: 10-click.t
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/t/10-click.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** 10-click.t	24 Mar 2002 11:00:27 -0000	1.2
--- 10-click.t	27 Apr 2002 20:20:37 -0000	1.3
***************
*** 16,20 ****
  use vars qw($HOSTNAME $PORT $URL $TEST);
  
! BEGIN { plan tests => 1 }
  
  # init tests
--- 16,20 ----
  use vars qw($HOSTNAME $PORT $URL $TEST);
  
! BEGIN { plan tests => 2 }
  
  # init tests
***************
*** 105,109 ****
  	my $text = $@;
  	my $out_filter = sub {
! 	    $_[0] =~ s/line \d+/line NN/;
  	};
  	canonical_output(output_ref => \$text,
--- 105,109 ----
  	my $text = $@;
  	my $out_filter = sub {
! 	    $_[0] =~ s/at .*?API.pm line \d+/at path-to-API.pm line NN/;
  	};
  	canonical_output(output_ref => \$text,