X-Git-Url: https://code.delx.au/comingnext/blobdiff_plain/107359f62eb8d73b7117152720dd5eeb6cfc70cb..631bc47f3e5b8f4d65a6c1f0d4d49ae7558427e2:/build.pl

diff --git a/build.pl b/build.pl
index 467b71a..162e619 100644
--- a/build.pl
+++ b/build.pl
@@ -13,6 +13,7 @@ use Archive::Zip qw( :ERROR_CODES );
 unlink <*.wgz>;
 unlink <*.zip>;
 rmtree("ComingNextB");
+rmtree("ComingNextC");
 
 # update version info
 sed("comingNext/index.html", 'var version = \"(.*?)\";', 'var version = \"'.$version.'\";');
@@ -25,6 +26,12 @@ sed("comingNextB/index.html", 'var panelNum = 0;', 'var panelNum = 1;');
 sed("comingNextB/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>Coming Next (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>Coming Next B $2<\/string>');
 sed("comingNextB/Info.plist", '<key>Identifier<\/key>(\s*?)<string>(.*?)<\/string>', '<key>Identifier<\/key>$1<string>$2b<\/string>');
 
+# add additional widget
+copyrecursive("comingNext", "comingNextC");
+sed("comingNextC/index.html", 'var panelNum = 0;', 'var panelNum = 2;');
+sed("comingNextC/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>Coming Next (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>Coming Next C $2<\/string>');
+sed("comingNextC/Info.plist", '<key>Identifier<\/key>(\s*?)<string>(.*?)<\/string>', '<key>Identifier<\/key>$1<string>$2c<\/string>');
+
 # package release
 my $zip = Archive::Zip->new();
 $zip->addTree("ComingNext", "ComingNext");
@@ -34,9 +41,14 @@ $zip = Archive::Zip->new();
 $zip->addTree("ComingNextB", "ComingNextB");
 $zip->writeToFileNamed("comingNextB.wgz");
 
+$zip = Archive::Zip->new();
+$zip->addTree("ComingNextC", "ComingNextC");
+$zip->writeToFileNamed("comingNextC.wgz");
+
 $zip = Archive::Zip->new();
 $zip->addFile("comingNext.wgz");
 $zip->addFile("comingNextB.wgz");
+$zip->addFile("comingNextC.wgz");
 $zip->addFile("Readme.txt");
 $zip->addFile("License.txt");
 $zip->addFile("ComingNext_SkinFetcher_v1.1.sisx");