Commit 95570aca authored by bbaetz%acm.org's avatar bbaetz%acm.org

Bug 179513, take N. Fix the bracketing so that it actually works...

r=myk, justdave a=justdave
parent 46ce6219
...@@ -250,7 +250,7 @@ sub GenerateVersionTable { ...@@ -250,7 +250,7 @@ sub GenerateVersionTable {
print $fh "#\n"; print $fh "#\n";
require Data::Dumper; require Data::Dumper;
print($fh,Data::Dumper->Dump([\@::log_columns, \%::versions], print $fh (Data::Dumper->Dump([\@::log_columns, \%::versions],
['*::log_columns', '*::versions'])); ['*::log_columns', '*::versions']));
foreach my $i (@list) { foreach my $i (@list) {
...@@ -259,11 +259,11 @@ sub GenerateVersionTable { ...@@ -259,11 +259,11 @@ sub GenerateVersionTable {
} }
} }
@::legal_versions = sort {uc($a) cmp uc($b)} keys(%varray); @::legal_versions = sort {uc($a) cmp uc($b)} keys(%varray);
print($fh,Data::Dumper->Dump([\@::legal_versions, \%::components], print $fh (Data::Dumper->Dump([\@::legal_versions, \%::components],
['*::legal_versions', '*::components'])); ['*::legal_versions', '*::components']));
@::legal_components = sort {uc($a) cmp uc($b)} keys(%carray); @::legal_components = sort {uc($a) cmp uc($b)} keys(%carray);
print($fh,Data::Dumper->Dump([\@::legal_components, \@::legal_product, print $fh (Data::Dumper->Dump([\@::legal_components, \@::legal_product,
\@::legal_priority, \@::legal_severity, \@::legal_priority, \@::legal_severity,
\@::legal_platform, \@::legal_opsys, \@::legal_platform, \@::legal_opsys,
\@::legal_bug_status, \@::legal_resolution], \@::legal_bug_status, \@::legal_resolution],
...@@ -272,7 +272,7 @@ sub GenerateVersionTable { ...@@ -272,7 +272,7 @@ sub GenerateVersionTable {
'*::legal_platform', '*::legal_opsys', '*::legal_platform', '*::legal_opsys',
'*::legal_bug_status', '*::legal_resolution'])); '*::legal_bug_status', '*::legal_resolution']));
print($fh,Data::Dumper->Dump([\@::settable_resolution, \%::proddesc, print $fh (Data::Dumper->Dump([\@::settable_resolution, \%::proddesc,
\@::enterable_products, \%::prodmaxvotes], \@::enterable_products, \%::prodmaxvotes],
['*::settable_resolution', '*::proddesc', ['*::settable_resolution', '*::proddesc',
'*::enterable_products', '*::prodmaxvotes'])); '*::enterable_products', '*::prodmaxvotes']));
...@@ -298,7 +298,7 @@ sub GenerateVersionTable { ...@@ -298,7 +298,7 @@ sub GenerateVersionTable {
} }
} }
print($fh,Data::Dumper->Dump([\%::target_milestone, print $fh (Data::Dumper->Dump([\%::target_milestone,
\@::legal_target_milestone, \@::legal_target_milestone,
\%::milestoneurl], \%::milestoneurl],
['*::target_milestone', ['*::target_milestone',
...@@ -314,7 +314,7 @@ sub GenerateVersionTable { ...@@ -314,7 +314,7 @@ sub GenerateVersionTable {
$::keywordsbyname{$name} = $id; $::keywordsbyname{$name} = $id;
} }
print($fh,Data::Dumper->Dump([\@::legal_keywords, \%::keywordsbyname], print $fh (Data::Dumper->Dump([\@::legal_keywords, \%::keywordsbyname],
['*::legal_keywords', '*::keywordsbyname'])); ['*::legal_keywords', '*::keywordsbyname']));
print $fh "1;\n"; print $fh "1;\n";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment