diff options
Diffstat (limited to 't/release-pp-is-loaded.t')
-rw-r--r-- | t/release-pp-is-loaded.t | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/t/release-pp-is-loaded.t b/t/release-pp-is-loaded.t new file mode 100644 index 0000000..1736ced --- /dev/null +++ b/t/release-pp-is-loaded.t @@ -0,0 +1,28 @@ + +BEGIN { + unless ($ENV{RELEASE_TESTING}) { + require Test::More; + Test::More::plan(skip_all => 'these tests are for release candidate testing'); + } +} + +use strict; +use warnings; + +use Test::More; + +BEGIN { + $ENV{PV_TEST_PERL} = 1; + $ENV{PV_WARN_FAILED_IMPLEMENTATION} = 1; +} + +use Module::Implementation 0.04 (); +use Params::Validate; + +is( + Module::Implementation::implementation_for('Params::Validate'), + 'PP', + 'PP implementation is loaded when env var is set' +); + +done_testing(); |