Fridolin Somers
325a96a406
Since Bug 36323 moved koha_perl_deps.pl it is not needed anymore in 00-strict.t It fails with : koha_1 | Can't stat koha_perl_deps.pl: No such file or directory koha_1 | at /usr/share/perl5/Test/Strict.pm line 151. Patch remove koha_perl_deps.pl from @dirs. It contains misc. Test plan : prove t/db_dependent/00-strict.t Signed-off-by: David Nind <david@davidnind.com> Signed-off-by: Matt Blenkinsop <matt.blenkinsop@ptfs-europe.com> Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
57 lines
1.4 KiB
Perl
Executable file
57 lines
1.4 KiB
Perl
Executable file
#!/usr/bin/perl
|
|
# This script is called by the pre-commit git hook to test modules compile
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use threads; # used for parallel
|
|
use Test::More;
|
|
use Test::Strict;
|
|
use Parallel::ForkManager;
|
|
use Sys::CPU;
|
|
|
|
use lib("misc/translator");
|
|
use lib("installer");
|
|
|
|
my @dirs = (
|
|
'acqui', 'admin',
|
|
'authorities', 'basket',
|
|
'catalogue', 'cataloguing',
|
|
'changelanguage.pl', 'circ',
|
|
'debian', 'docs',
|
|
'errors', 'fix-perl-path.PL', 'help.pl',
|
|
'installer', 'kohaversion.pl', 'labels',
|
|
'mainpage.pl', 'Makefile.PL',
|
|
'members', 'misc',
|
|
'offline_circ', 'opac',
|
|
'patroncards', 'reports',
|
|
'reserve', 'reviews',
|
|
'rewrite-config.PL', 'rotating_collections',
|
|
'serials', 'services',
|
|
'skel', 'suggestion',
|
|
'svc', 'tags',
|
|
'tools', 'virtualshelves'
|
|
);
|
|
|
|
$Test::Strict::TEST_STRICT = 0;
|
|
|
|
my $ncpu;
|
|
if ( $ENV{KOHA_PROVE_CPUS} ) {
|
|
$ncpu = $ENV{KOHA_PROVE_CPUS} ; # set number of cpus to use
|
|
} else {
|
|
$ncpu = Sys::CPU::cpu_count();
|
|
}
|
|
|
|
my $pm = Parallel::ForkManager->new($ncpu);
|
|
|
|
foreach my $d (@dirs) {
|
|
$pm->start and next; # do the fork
|
|
|
|
all_perl_files_ok($d);
|
|
|
|
$pm->finish; # do the exit in the child process
|
|
}
|
|
|
|
$pm->wait_all_children;
|
|
|
|
done_testing();
|