7ecf2c2dc4
Script to test modules compile, when used with a pre-commit hook this can test before a commit Signed-off-by: Frédéric Demians <f.demians@tamil.fr> Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
25 lines
681 B
Perl
25 lines
681 B
Perl
# This script is called by the pre-commit git hook to test modules compile
|
|
|
|
use strict;
|
|
use warnings;
|
|
use Test::More;
|
|
use Path::Class;
|
|
use File::Find;
|
|
|
|
my $lib = dir('C4')->absolute->resolve;
|
|
find({
|
|
bydepth => 1,
|
|
no_chdir => 1,
|
|
wanted => sub {
|
|
my $m = $_;
|
|
return unless $m =~ s/[.]pm$//;
|
|
return if $m =~ /Auth_with_ldap/; # Dont test this, it will fail on use
|
|
return if $m =~ /Cache/; # Cache modules are a WIP, add the tests back when we are using them more
|
|
return if $m =~ /SIP/; # SIP modules will not load clean
|
|
$m =~ s{^.*/C4/}{C4/};
|
|
$m =~ s{/}{::}g;
|
|
use_ok($m) || BAIL_OUT("***** PROBLEMS LOADING FILE '$m'");
|
|
},
|
|
}, $lib);
|
|
done_testing();
|
|
|