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,
|