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

typo in upgrade script, MessageLog => messageLog

Browse source
This commit is contained in:
Colin Kuskie 2006-03-23 18:54:48 +00:00
parent 089c312b74
commit fb066d9a9a
2 changed files with 4 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

2
docs/upgrades/upgrade_6.8.7-6.99.0.pl
View file

@ -89,7 +89,7 @@ sub convertMessageLogToInbox {
}
$session->db->write("delete from userProfileField where fieldname='INBOXNotifications'");
$session->db->write("delete from userProfileData where fieldname='INBOXNotifications'");
$session->db->write("drop table MessageLog");
$session->db->write("drop table if exists messageLog");
$rs = $session->db->read("select distinct assetId from template where namespace='Operation/MessageLog/View' or namespace='Operation/MessageLog/Message'");
while (my ($id) = $rs->array) {
my $asset = WebGUI::Asset->new($session, $id, "WebGUI::Asset::Template");

15
t/syntaxCheck.t
View file

@ -20,7 +20,6 @@ use Test::More;
plan skip_all => 'set TEST_SYNTAX to enable this test' unless $ENV{TEST_SYNTAX};
my @modules;
my @failed_packages;
my $wgLib = WebGUI::Test->lib;
diag("Checking modules in $wgLib");
File::Find::find( \&getWebGUIModules, $wgLib);
@ -32,17 +31,9 @@ plan tests => $numTests;
diag("Planning on $numTests tests");
foreach my $package (@modules) {
my $returnVal = system("$^X -I$wgLib -wc $package");
is($returnVal, 0, "syntax check for $package");
push(@failed_packages, $package) if ($returnVal != 0);
}
if (@failed_packages) {
print "\n# Compilation FAILED for the following packages:\n";
foreach my $package (@failed_packages) {
print "# - $package\n";
}
print "\n"
my $command = "$^X -I$wgLib -wc $package 2>&1";
my $output = `$command`;
is($?, 0, "syntax check for $package");
}
#----------------------------------------