diff options
author | Gianni Ceccarelli <dakkar@dechirico.(none)> | 2009-04-23 15:04:07 +0200 |
---|---|---|
committer | Gianni Ceccarelli <dakkar@dechirico.(none)> | 2009-04-23 15:04:07 +0200 |
commit | 1f9c8426a9bf1c94a6cf00edd85628d1c09e22e0 (patch) | |
tree | 542697b5e3bcb903f117d0765cc7e3d8e05d2858 /t/00-author-critic.t | |
parent | doc about importing (diff) | |
download | Tree-Transform-XSLTish-1f9c8426a9bf1c94a6cf00edd85628d1c09e22e0.tar.gz Tree-Transform-XSLTish-1f9c8426a9bf1c94a6cf00edd85628d1c09e22e0.tar.bz2 Tree-Transform-XSLTish-1f9c8426a9bf1c94a6cf00edd85628d1c09e22e0.zip |
new tests
Diffstat (limited to 't/00-author-critic.t')
-rw-r--r-- | t/00-author-critic.t | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/t/00-author-critic.t b/t/00-author-critic.t new file mode 100644 index 0000000..d0a133a --- /dev/null +++ b/t/00-author-critic.t @@ -0,0 +1,33 @@ +#!/usr/bin/perl + +# Test that the module passes perlcritic +use strict; +BEGIN { + $| = 1; + $^W = 1; +} + +my @MODULES = ( + 'Perl::Critic 1.098', + 'Test::Perl::Critic 1.01', +); + +# Don't run tests during end-user installs +use Test::More; +unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) { + plan( skip_all => "Author tests not required for installation" ); +} + +# Load the testing modules +foreach my $MODULE ( @MODULES ) { + eval "use $MODULE"; + if ( $@ ) { + $ENV{RELEASE_TESTING} + ? die( "Failed to load required release-testing module $MODULE" ) + : plan( skip_all => "$MODULE not available for testing" ); + } +} +Test::Perl::Critic->import( -exclude => ['ProhibitSubroutinePrototypes']); +all_critic_ok(); + +1; |