oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix upgrade script compile checks

Browse source
This commit is contained in:
Graham Knop 2011-04-06 10:01:59 -05:00
parent c7bbb4e639
commit 9ec788a603
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
t/00_compile.t
View file

@ -26,7 +26,7 @@ my $wgLib = catdir($wgRoot, 'lib');
unshift @INC, $wgLib;
my @modules = findModules($wgLib);
my @scripts = findScripts(catdir($wgRoot, 'docs', 'upgrades'), catdir($wgRoot, 'sbin'));
my @scripts = findScripts(catdir($wgRoot, 'sbin'), catdir($wgRoot, 'share', 'upgrades', '*'));
plan tests => 2 * (scalar @modules + scalar @scripts);
my $failed_compile = 0;
@ -75,6 +75,8 @@ for my $script (@scripts) {
local $SIG{__WARN__} = sub {
$warnings .= shift;
};
# upgrade scripts need a version defined to be able to compile
local $ENV{WEBGUI_UPGRADE_VERSION} = '8.0.0';
eval $to_compile;
chomp $warnings;
is($@, '', "$short_name compiles successfully");