X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F04critic.t;fp=t%2F04critic.t;h=d94c165770be3c1fdb448606719fdcfca6ee0092;hb=72304f1702abf6fe42ac826409242165f7c75b39;hp=0000000000000000000000000000000000000000;hpb=0ef99f8c77a89b0010ba03c5467f6bf4dae5d0e9;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/04critic.t b/t/04critic.t
new file mode 100644
index 0000000..d94c165
--- /dev/null
+++ b/t/04critic.t
@@ -0,0 +1,22 @@
+use strict;
+use warnings;
+
+use File::Spec;
+use FindBin ();
+use Test::More;
+
+if ( !-e "$FindBin::Bin/../MANIFEST.SKIP" ) {
+    plan skip_all => 'Critic test only for developers.';
+}
+else {
+    eval { require Test::Perl::Critic };
+    if ( $@ ) {
+        plan tests => 1;
+        fail( 'You must install Test::Perl::Critic to run 04critic.t' );
+        exit;
+    }
+}
+
+my $rcfile = File::Spec->catfile( 't', '04critic.rc' );
+Test::Perl::Critic->import( -profile => $rcfile );
+all_critic_ok();
\ No newline at end of file