summaryrefslogtreecommitdiff
path: root/xt/00-author-critic.t
diff options
context:
space:
mode:
Diffstat (limited to 'xt/00-author-critic.t')
-rw-r--r--xt/00-author-critic.t35
1 files changed, 35 insertions, 0 deletions
diff --git a/xt/00-author-critic.t b/xt/00-author-critic.t
new file mode 100644
index 0000000..13fe8e7
--- /dev/null
+++ b/xt/00-author-critic.t
@@ -0,0 +1,35 @@
+#!/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',
+ 'File::Spec',
+);
+
+# 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" );
+ }
+}
+my $rcfile = File::Spec->catfile( 'xt', 'perlcriticrc' );
+Test::Perl::Critic->import( -profile => $rcfile );
+all_critic_ok();
+
+1;