catchup merge
authorMattD <mattd@symbian.org>
Mon, 24 Aug 2009 14:37:08 +0100 (2009-08-24)
changeset 378 71d64162329a
parent 377 598bc53daddb (current diff)
parent 372 ea854a4b723d (diff)
child 379 1d777b8357df
catchup merge
--- a/common/tools/populateziptemplate.pl	Mon Aug 24 14:35:52 2009 +0100
+++ b/common/tools/populateziptemplate.pl	Mon Aug 24 14:37:08 2009 +0100
@@ -68,7 +68,7 @@
 my $keyAttr = { config => "name", name => "set"};
 # Load template
 my $xml = XML::Simple->new();
-my $zipConfig = $xml->XMLin($template, KeyAttr => $keyAttr);
+my $zipConfig = $xml->XMLin($template, keyattr => $keyAttr);
 my @allRndFiles;
 
 # For each package in CSV...
@@ -148,7 +148,7 @@
 my @excludes = map { {name => "exclude", value => "$_"} } @allRndFiles;
 push @{$zipConfig->{config}->{config}->{bin}->{config}->{set}}, @excludes;
 
-$xml->XMLout($zipConfig, OutputFile => $ftl, XMLDecl => 1, RootName => 'build', KeyAttr => $keyAttr);
+$xml->XMLout($zipConfig, OutputFile => $ftl, XMLDecl => 1, RootName => 'build', keyattr => $keyAttr);
 
 # Output all rnd files into exclude list for later
 open my $fh, ">", $rndExcludes or die "Cannot write exlude file!";