diff options
Diffstat (limited to 'debian/perl-framework/Apache-Test/t/more')
5 files changed, 60 insertions, 0 deletions
diff --git a/debian/perl-framework/Apache-Test/t/more/01testpm.t b/debian/perl-framework/Apache-Test/t/more/01testpm.t new file mode 100644 index 0000000..0883e92 --- /dev/null +++ b/debian/perl-framework/Apache-Test/t/more/01testpm.t @@ -0,0 +1,8 @@ +# see the description in t/more/all.t + +use strict; +use warnings FATAL => qw(all); + +use Apache::TestRequest 'GET_BODY_ASSERT'; +print GET_BODY_ASSERT "/TestMore__testpm"; + diff --git a/debian/perl-framework/Apache-Test/t/more/02testmore.t b/debian/perl-framework/Apache-Test/t/more/02testmore.t new file mode 100644 index 0000000..440f39c --- /dev/null +++ b/debian/perl-framework/Apache-Test/t/more/02testmore.t @@ -0,0 +1,8 @@ +# see the description in t/more/all.t + +use strict; +use warnings FATAL => qw(all); + +use Apache::TestRequest 'GET_BODY_ASSERT'; +print GET_BODY_ASSERT "/TestMore__testmorepm"; + diff --git a/debian/perl-framework/Apache-Test/t/more/03testpm.t b/debian/perl-framework/Apache-Test/t/more/03testpm.t new file mode 100644 index 0000000..0883e92 --- /dev/null +++ b/debian/perl-framework/Apache-Test/t/more/03testpm.t @@ -0,0 +1,8 @@ +# see the description in t/more/all.t + +use strict; +use warnings FATAL => qw(all); + +use Apache::TestRequest 'GET_BODY_ASSERT'; +print GET_BODY_ASSERT "/TestMore__testpm"; + diff --git a/debian/perl-framework/Apache-Test/t/more/04testmore.t b/debian/perl-framework/Apache-Test/t/more/04testmore.t new file mode 100644 index 0000000..440f39c --- /dev/null +++ b/debian/perl-framework/Apache-Test/t/more/04testmore.t @@ -0,0 +1,8 @@ +# see the description in t/more/all.t + +use strict; +use warnings FATAL => qw(all); + +use Apache::TestRequest 'GET_BODY_ASSERT'; +print GET_BODY_ASSERT "/TestMore__testmorepm"; + diff --git a/debian/perl-framework/Apache-Test/t/more/all.t b/debian/perl-framework/Apache-Test/t/more/all.t new file mode 100644 index 0000000..c36a2dc --- /dev/null +++ b/debian/perl-framework/Apache-Test/t/more/all.t @@ -0,0 +1,28 @@ +# skip all the Test::More tests if Test::More is +# not of a sufficient version; + +use strict; +use warnings FATAL => 'all'; + +use Apache::Test; + +plan tests => 1, need need_min_module_version(qw(Test::More 0.48_01)), + need_module('mod_perl.c'); + +ok 1; + + +# the t/more/ directory is testing a few things. +# +# first, it is testing that the special +# Apache::Test qw(-withtestmore); +# import works, which allows Apache::Test to use +# Test::More as the backend (in place of Test.pm) +# for server-side tests. +# +# secondly, it is testing that we can intermix +# scripts that use Test.pm and Test::More as the +# backend, which was a bug that needed to be worked +# around in early implementations of -withtestmore. +# hence the reason for the specific ordering of the +# tests in t/more/. |