Update of /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest/Plugin
In directory sc8-pr-cvs1:/tmp/cvs-serv29342/lib/HTTP/WebTest/Plugin
Modified Files:
HarnessReport.pm
Log Message:
HTTP::WebTest::Plugin::HarnessReport is rewritten using
Test::Builder. As side effect now you can freely intermix
HTTP::WebTest based tests with tests written using other testing
libraries like Test::More or Test::Differences. Unfortunately this
change breaks existing test scripts which were using
HTTP::WebTest::Plugin::HarnessReport because now number of tests in
test scripts should be declared explictly with 'use Test::More plan =>
NN' or 'use Test::More qw(no_plan)'.
Index: HarnessReport.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/lib/HTTP/WebTest/Plugin/HarnessReport.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** HarnessReport.pm 13 Dec 2002 00:54:22 -0000 1.9
--- HarnessReport.pm 13 Dec 2002 01:23:11 -0000 1.10
***************
*** 9,35 ****
=head1 SYNOPSIS
! plugins = ( ::HarnessReport )
! default_report = no
=head1 DESCRIPTION
This plugin creates reports that are compatible with
! L<Test::Harness|Test::Harness>.
! By default, this plugin is not loaded by
! L<HTTP::WebTest|HTTP::WebTest>. To load it, use the global test parameter
! C<plugins>.
! Unless you want to get mix of outputs from the default report and this report,
! the default report plugin should be disabled. See parameter
! C<default_report> (value C<no>).
Test parameters C<plugins> and C<default_report> are documented in
L<HTTP::WebTest|HTTP::WebTest>.
=cut
use strict;
! use base qw(HTTP::WebTest::ReportPlugin);
use HTTP::WebTest::Utils qw(make_access_method);
--- 9,41 ----
=head1 SYNOPSIS
! N/A
=head1 DESCRIPTION
This plugin creates reports that are compatible with
! L<Test::Harness|Test::Harness>. By default, this plugin is not loaded
! by L<HTTP::WebTest|HTTP::WebTest>. To load it, use the global test
! parameter C<plugins>. Internally this plugin uses
! L<Test::Builder|Test::Builder> module so it should be compatible with
! other testing libraries (like L<Test::More|Test::More> or
! L<Test::Differences|Test::Differences>). You should be able to
! intermix them freely in one test script.
! Unless you want to get mix of outputs from the default report and this
! report (normally you don't want it), the default report plugin should
! be disabled. See parameter C<default_report> (value C<no>).
Test parameters C<plugins> and C<default_report> are documented in
L<HTTP::WebTest|HTTP::WebTest>.
+ =head1 EXAMPLE
+
+ See L<HTTP::WebTest::Cookbook|HTTP::WebTest::Cookbook> for example.
+
=cut
use strict;
! use base qw(HTTP::WebTest::Plugin);
use HTTP::WebTest::Utils qw(make_access_method);
***************
*** 44,47 ****
--- 50,58 ----
my $TEST = Test::Builder->new;
+ # declare supported test params
+ sub param_types {
+ return q(test_name scalar);
+ }
+
sub report_test {
my $self = shift;
***************
*** 99,105 ****
L<HTTP::WebTest::Plugin|HTTP::WebTest::Plugin>
- L<HTTP::WebTest::ReportPlugin|HTTP::WebTest::ReportPlugin>
-
L<HTTP::WebTest::Plugins|HTTP::WebTest::Plugins>
=cut
--- 110,116 ----
L<HTTP::WebTest::Plugin|HTTP::WebTest::Plugin>
L<HTTP::WebTest::Plugins|HTTP::WebTest::Plugins>
+
+ L<Test::Builder|Test::Builder>
=cut
|