diff options
author | Olivier Thauvin <nanardon@mageia.org> | 2010-09-23 23:13:54 +0000 |
---|---|---|
committer | Olivier Thauvin <nanardon@mageia.org> | 2010-09-23 23:13:54 +0000 |
commit | 57beda663bb4448ad838b599e5df5bf50375a5cb (patch) | |
tree | 605e8d2d3784bf8ee877b857185d76d262930cef /t | |
download | mgamirrors-57beda663bb4448ad838b599e5df5bf50375a5cb.tar mgamirrors-57beda663bb4448ad838b599e5df5bf50375a5cb.tar.gz mgamirrors-57beda663bb4448ad838b599e5df5bf50375a5cb.tar.bz2 mgamirrors-57beda663bb4448ad838b599e5df5bf50375a5cb.tar.xz mgamirrors-57beda663bb4448ad838b599e5df5bf50375a5cb.zip |
- init
Diffstat (limited to 't')
-rw-r--r-- | t/01app.t | 10 | ||||
-rw-r--r-- | t/02pod.t | 10 | ||||
-rw-r--r-- | t/03podcoverage.t | 14 |
3 files changed, 34 insertions, 0 deletions
diff --git a/t/01app.t b/t/01app.t new file mode 100644 index 0000000..41b109d --- /dev/null +++ b/t/01app.t @@ -0,0 +1,10 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; + +BEGIN { use_ok 'Catalyst::Test', 'MGA::Mirrors' } + +ok( request('/')->is_success, 'Request should succeed' ); + +done_testing(); diff --git a/t/02pod.t b/t/02pod.t new file mode 100644 index 0000000..ababc2e --- /dev/null +++ b/t/02pod.t @@ -0,0 +1,10 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; + +plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD}; +eval "use Test::Pod 1.14"; +plan skip_all => 'Test::Pod 1.14 required' if $@; + +all_pod_files_ok(); diff --git a/t/03podcoverage.t b/t/03podcoverage.t new file mode 100644 index 0000000..6ddc5c6 --- /dev/null +++ b/t/03podcoverage.t @@ -0,0 +1,14 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; + +plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD}; + +eval "use Test::Pod::Coverage 1.04"; +plan skip_all => 'Test::Pod::Coverage 1.04 required' if $@; + +eval "use Pod::Coverage 0.20"; +plan skip_all => 'Pod::Coverage 0.20 required' if $@; + +all_pod_coverage_ok(); |