From afb209cbcfae7b88d8fb23ed04c47e1aee187b2a Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Wed, 11 Aug 2010 09:59:29 +0200
Subject: initial commit

---
 t/99_perl_critic.t | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 t/99_perl_critic.t

(limited to 't/99_perl_critic.t')

diff --git a/t/99_perl_critic.t b/t/99_perl_critic.t
new file mode 100644
index 0000000..c7b6b61
--- /dev/null
+++ b/t/99_perl_critic.t
@@ -0,0 +1,21 @@
+use strict;
+use warnings;
+use File::Spec;
+use Test::More;
+use English qw(-no_match_vars);
+
+if ( not $ENV{TEST_AUTHOR} ) {
+    my $msg = 'Author test.  Set $ENV{TEST_AUTHOR} to a true value to run.';
+    plan( skip_all => $msg );
+}
+
+eval { require Test::Perl::Critic; };
+
+if ( $EVAL_ERROR ) {
+   my $msg = 'Test::Perl::Critic required to criticise code';
+   plan( skip_all => $msg );
+}
+
+my $rcfile = File::Spec->catfile( 't', 'perlcriticrc' );
+Test::Perl::Critic->import( -profile => $rcfile );
+all_critic_ok();
\ No newline at end of file
-- 
cgit v1.2.3