Bug 28320: Add DB connection check to the SIP SC status message

[srvgit] / t / 00-testcritic.t

diff --git a/t/00-testcritic.t b/t/00-testcritic.t
index 8a7f5d2..4c7f441 100755 (executable)
--- a/t/00-testcritic.t
+++ b/t/00-testcritic.t
@@ -1,39 +1,13 @@
 #!/usr/bin/env perl
 
 # This script can be used to run perlcritic on perl files in koha
-# It calls its own custom perlcriticrc
 # The script is purely optional requiring Test::Perl::Critic to be installed 
 # and the environment variable TEST_QA to be set
-# At present only the directories in @dirs will pass the tests in 'Gentle' mode
 
 use Modern::Perl;
-use File::Spec;
 use Test::More;
 use English qw(-no_match_vars);
 
-my @dirs = qw(
-    acqui
-    admin
-    authorities
-    basket
-    catalogue
-    cataloguing
-    circ
-    debian
-    errors
-    labels
-    members
-    offline_circ
-    reserve
-    reviews
-    rotating_collections
-    serials
-    sms
-    virtualshelves
-    Koha
-    C4/SIP
-);
-
 if ( not $ENV{TEST_QA} ) {
     my $msg = 'Author test. Set $ENV{TEST_QA} to a true value to run';
     plan( skip_all => $msg );
@@ -46,7 +20,5 @@ if ( $EVAL_ERROR ) {
     plan( skip_all => $msg );
 }
 
-my $rcfile = File::Spec->catfile( 't', 'perlcriticrc' );
-Test::Perl::Critic->import( -profile => $rcfile);
-all_critic_ok(@dirs);
-
+Test::Perl::Critic->import( -profile => '.perlcriticrc');
+all_critic_ok('.');