http-webtest-commits

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

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

Modified Files:
	05-report.t 
Log Message:
Added more tests and fixed old tests for HarnessReport plugin


Index: 05-report.t
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/t/05-report.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** 05-report.t	12 Feb 2002 12:47:35 -0000	1.2
--- 05-report.t	8 Apr 2002 06:52:00 -0000	1.3
***************
*** 19,23 ****
  use vars qw($HOSTNAME $PORT $URL $TEST);
  
! BEGIN { plan tests => 11 }
  
  # init tests
--- 19,23 ----
  use vars qw($HOSTNAME $PORT $URL $TEST);
  
! BEGIN { plan tests => 12 }
  
  # init tests
***************
*** 140,144 ****
  }
  
! # 10: test HTTP::WebTest::Plugin::HarnessReport plugin
  {
      my $tests = [ $TEST,
--- 140,145 ----
  }
  
! # 10: test HTTP::WebTest::Plugin::HarnessReport plugin (with some
! # tests failing)
  {
      my $tests = [ $TEST,
***************
*** 155,162 ****
  		  opts => $opts,
  		  tests => $tests,
! 		  check_file => 't/test.out/test-harness')
  }
  
! # 11: test show_headers parameter
  {
      # remove cookies from cookie jar - it affects output of report plugin
--- 156,178 ----
  		  opts => $opts,
  		  tests => $tests,
! 		  check_file => 't/test.out/test-harness-not-ok')
  }
  
! # 11: test HTTP::WebTest::Plugin::HarnessReport plugin (with all tests
! # passing)
! {
!     my $tests = [ $TEST, $TEST ];
! 
!     my $opts = { plugins => [ '::HarnessReport' ],
! 		 default_report => 'no' };
! 
!     check_webtest(webtest => $WEBTEST,
! 		  server_url => $URL,
! 		  opts => $opts,
! 		  tests => $tests,
! 		  check_file => 't/test.out/test-harness-ok')
! }
! 
! # 12: test show_headers parameter
  {
      # remove cookies from cookie jar - it affects output of report plugin