http-webtest-commits

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

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

Modified Files:
	API.pm 
Log Message:
Added method last_test_num


Index: API.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest/API.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** API.pm	15 Feb 2002 10:38:33 -0000	1.5
--- API.pm	20 Feb 2002 21:32:31 -0000	1.6
***************
*** 111,115 ****
  
      # run all tests
!     for my $test (@{$self->tests}) {
  	$self->run_test($test, $self->_global_test_params);
      }
--- 111,117 ----
  
      # run all tests
!     for my $i (0 .. @{$self->tests} - 1) {
! 	my $test = $self->tests->[$i];
! 	$self->last_test_num($i);
  	$self->run_test($test, $self->_global_test_params);
      }
***************
*** 422,425 ****
--- 424,437 ----
  }
  
+ =head2 last_test_num ()
+ 
+ =head3 Returns
+ 
+ A number of last test being or been run.
+ 
+ =cut
+ 
+ *last_test_num = make_access_method('LAST_TEST_NUM');
+ 
  =head2 last_test ()
  
***************
*** 576,580 ****
  
  C<HTTP::WebTest 2.xx> offers more rich API than its predecessor
! C<HTTP::WebTest 1.xx>. However while deprecated old API is still
  supported.
  
--- 588,592 ----
  
  C<HTTP::WebTest 2.xx> offers more rich API than its predecessor
! C<HTTP::WebTest 1.xx>. However while old API is deprecated it is still
  supported.