View | Details | Raw Unified | Return to bug 18055
Collapse All | Expand All

(-)a/C4/Installer/PerlDependencies.pm (+10 lines)
Lines 862-867 our $PERL_DEPS = { Link Here
862
        'required' => '0',
862
        'required' => '0',
863
        'min_ver'  => '0.07',
863
        'min_ver'  => '0.07',
864
    },
864
    },
865
    'Parallel::ForkManager' => {
866
        usage => 'Core',
867
        required => 0,
868
        min_ver => '0.75',
869
    },
870
    'Sys::CPU' => {
871
        usage => 'Core',
872
        required => 0,
873
        min_ver => '0.52',
874
    },
865
};
875
};
866
876
867
1;
877
1;
(-)a/debian/control (+2 lines)
Lines 92-97 Build-Depends: libalgorithm-checkdigits-perl, Link Here
92
 libnet-z3950-zoom-perl,
92
 libnet-z3950-zoom-perl,
93
 libnumber-format-perl,
93
 libnumber-format-perl,
94
 libopenoffice-oodoc-perl,
94
 libopenoffice-oodoc-perl,
95
 libparallel-forkmanager-perl,
95
 libpath-tiny-perl,
96
 libpath-tiny-perl,
96
 libpdf-api2-perl,
97
 libpdf-api2-perl,
97
 libpdf-api2-simple-perl,
98
 libpdf-api2-simple-perl,
Lines 110-115 Build-Depends: libalgorithm-checkdigits-perl, Link Here
110
 libsoap-lite-perl,
111
 libsoap-lite-perl,
111
 libstring-random-perl,
112
 libstring-random-perl,
112
 libswagger2-perl (>= 0.59),
113
 libswagger2-perl (>= 0.59),
114
 libsys-cpu-perl
113
 libtemplate-perl,
115
 libtemplate-perl,
114
 libtemplate-plugin-htmltotext-perl,
116
 libtemplate-plugin-htmltotext-perl,
115
 libtemplate-plugin-json-escape-perl,
117
 libtemplate-plugin-json-escape-perl,
(-)a/t/db_dependent/00-strict.t (-13 / +52 lines)
Lines 1-24 Link Here
1
#!/usr/bin/perl
1
# This script is called by the pre-commit git hook to test modules compile
2
# This script is called by the pre-commit git hook to test modules compile
2
3
3
use strict;
4
use strict;
4
use warnings;
5
use warnings;
6
7
use threads;    # used for parallel
5
use Test::More;
8
use Test::More;
6
use Test::Strict;
9
use Test::Strict;
7
use File::Spec;
10
use Parallel::ForkManager;
8
use File::Find;
11
use Sys::CPU;
12
9
use lib("misc/translator");
13
use lib("misc/translator");
10
use lib("installer");
14
use lib("installer");
11
15
12
my @dirs = ( 'acqui', 'admin', 'authorities', 'basket',
16
my @dirs = (
13
    'catalogue', 'cataloguing', 'changelanguage.pl', 'circ', 'debian', 'docs',
17
    'acqui',                'admin',
14
    'edithelp.pl', 'errors', 'fix-perl-path.PL', 'help.pl', 'installer',
18
    'authorities',          'basket',
15
    'koha_perl_deps.pl', 'kohaversion.pl', 'labels',
19
    'catalogue',            'cataloguing',
16
    'mainpage.pl', 'Makefile.PL', 'members', 'misc', 'offline_circ', 'opac',
20
    'changelanguage.pl',    'circ',
17
    'patroncards', 'reports', 'reserve', 'reviews',
21
    'debian',               'docs',
18
    'rewrite-config.PL', 'rotating_collections', 'serials', 'services', 'skel',
22
    'edithelp.pl',          'errors',
19
    'sms', 'suggestion', 'svc', 'tags', 'tools', 'virtualshelves' );
23
    'fix-perl-path.PL',     'help.pl',
24
    'installer',            'koha_perl_deps.pl',
25
    'kohaversion.pl',       'labels',
26
    'mainpage.pl',          'Makefile.PL',
27
    'members',              'misc',
28
    'offline_circ',         'opac',
29
    'patroncards',          'reports',
30
    'reserve',              'reviews',
31
    'rewrite-config.PL',    'rotating_collections',
32
    'serials',              'services',
33
    'skel',                 'sms',
34
    'suggestion',           'svc',
35
    'tags',                 'tools',
36
    'virtualshelves'
37
);
20
38
21
$Test::Strict::TEST_STRICT = 0;
39
$Test::Strict::TEST_STRICT = 0;
22
$Test::Strict::TEST_SKIP = [ 'misc/kohalib.pl', 'sms/sms_listen_windows_start.pl', 'misc/plack/koha.psgi' ];
40
$Test::Strict::TEST_SKIP   = [
41
    'misc/kohalib.pl', 'sms/sms_listen_windows_start.pl',
42
    'misc/plack/koha.psgi'
43
];
44
45
my $ncpu;
46
if ( $ENV{KOHA_JENKINS} ) {
47
    $ncpu = 2; # works fastest on kc.org jenkins box
48
} else {
49
    $ncpu = Sys::CPU::cpu_count();
50
}
51
52
my $pm   = new Parallel::ForkManager($ncpu);
53
54
foreach my $d (@dirs) {
55
    $pm->start and next;    # do the fork
56
57
    all_perl_files_ok($d);
58
59
    $pm->finish;            # do the exit in the child process
60
}
61
62
$pm->wait_all_children;
23
63
24
all_perl_files_ok(@dirs);
64
done_testing();
25
- 

Return to bug 18055