[Http-webtest-commits] HTTP-WebTest-Plugin-DateTest/t 01_basic.t,1.1.1.1,1.2

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

Update of /cvsroot/http-webtest/HTTP-WebTest-Plugin-DateTest/t
In directory sc8-pr-cvs1:/tmp/cvs-serv16587/t

Modified Files:
	01_basic.t 
Log Message:
Use Test::More instead of Test::Simple


Index: 01_basic.t
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Plugin-DateTest/t/01_basic.t,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** 01_basic.t	12 Sep 2002 13:11:01 -0000	1.1.1.1
--- 01_basic.t	26 Dec 2002 21:17:46 -0000	1.2
***************
*** 4,21 ****
  #########################
  
! use Test::Simple tests => 3;
  require 't/utils.pl';
  my $loaded = 0;
  use lib qw(./t/lib ./blib/lib);
- use HTTP::WebTest::Plugin::DateTest;
- $loaded++;
  
! # 1 - if we make it here loading was OK
! ok($loaded = 1, 'Import of HTTP::WebTest::Plugin::DateTest');
  
! # 2 - test wether HTTP::WebTest is installed
! eval { require HTTP::WebTest };
  my $WEBTEST = HTTP::WebTest->new;
- ok($@ eq '', 'Check for HTTP::WebTest on this system');
  
  # 3 - do some real request
--- 4,18 ----
  #########################
  
! use Test::More tests => 3;
  require 't/utils.pl';
  my $loaded = 0;
  use lib qw(./t/lib ./blib/lib);
  
! # 1 - test whether HTTP::WebTest::Plugin::DateTest can be loaded
! require_ok 'HTTP::WebTest::Plugin::DateTest';
  
! # 2 - test whether HTTP::WebTest is installed
! require_ok 'HTTP::WebTest';
  my $WEBTEST = HTTP::WebTest->new;
  
  # 3 - do some real request
***************
*** 29,33 ****
            date_end => [ 'endtest', '</p>' ],
          } ];
!  
      check_webtest(webtest => $WEBTEST,
                    tests => $tests,
--- 26,30 ----
            date_end => [ 'endtest', '</p>' ],
          } ];
! 
      check_webtest(webtest => $WEBTEST,
                    tests => $tests,