common/tools/populateziptemplate.pl
changeset 111 5b0bc2f89660
parent 108 d33d43677cdf
child 247 cfde8b1784f7
--- a/common/tools/populateziptemplate.pl	Tue May 26 17:02:52 2009 +0100
+++ b/common/tools/populateziptemplate.pl	Wed May 27 14:11:37 2009 +0100
@@ -118,12 +118,15 @@
 		next unless @files;
 		# Add the files to this zip object
 		@files = grep {
-			chomp;
 			s{\\}{/}g;
 			s!^[A-Z]:/$package->{dst}/!!i;
 			m{^epoc32/}i;
 		} @files;
 		push @allRndFiles, @files;
+		
+		open FILE, ">", $name ."_includefile.txt" or die "Cannot write includefile!";
+		print FILE @files;
+		close FILE;
 	}
 	else
 	{
@@ -137,3 +140,7 @@
 
 $xml->XMLout($zipConfig, OutputFile => $ftl, XMLDecl => 1, RootName => 'build', KeyAttr => $keyAttr);
 
+# Output all rnd files into exclude list for later
+open FILE, "> rnd_excludefile.txt" or die "Cannot write exludefile!";
+print FILE @allRndFiles;
+close FILE;
\ No newline at end of file