#!/usr/bin/perl\r
\r
-my $version = "1.26";\r
+my $version = "1.29";\r
\r
use warnings;\r
use strict;\r
unlink <*.wgz>;\r
unlink <*.zip>;\r
rmtree("ComingNextB");\r
+rmtree("ComingNextC");\r
\r
# update version info\r
sed("comingNext/index.html", 'var version = \"(.*?)\";', 'var version = \"'.$version.'\";');\r
-sed("comingNext/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>Coming Next (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>Coming Next '.$version.'<\/string>');\r
+sed("comingNext/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>ComingNext (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>ComingNext '.$version.'<\/string>');\r
sed("comingNext/Info.plist", '<key>Version<\/key>(\s*?)<string>(.*?)<\/string>', '<key>Version<\/key>$1<string>'.$version.'<\/string>');\r
\r
# add additional widget\r
copyrecursive("comingNext", "comingNextB");\r
sed("comingNextB/index.html", 'var panelNum = 0;', 'var panelNum = 1;');\r
-sed("comingNextB/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>Coming Next (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>Coming Next B $2<\/string>');\r
+sed("comingNextB/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>ComingNext (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>ComingNext B $2<\/string>');\r
sed("comingNextB/Info.plist", '<key>Identifier<\/key>(\s*?)<string>(.*?)<\/string>', '<key>Identifier<\/key>$1<string>$2b<\/string>');\r
\r
+# add additional widget\r
+copyrecursive("comingNext", "comingNextC");\r
+sed("comingNextC/index.html", 'var panelNum = 0;', 'var panelNum = 2;');\r
+sed("comingNextC/Info.plist", '<key>DisplayName<\/key>(\s*?)<string>ComingNext (.*?)<\/string>', '<key>DisplayName<\/key>$1<string>ComingNext C $2<\/string>');\r
+sed("comingNextC/Info.plist", '<key>Identifier<\/key>(\s*?)<string>(.*?)<\/string>', '<key>Identifier<\/key>$1<string>$2c<\/string>');\r
+\r
# package release\r
my $zip = Archive::Zip->new();\r
$zip->addTree("ComingNext", "ComingNext");\r
$zip->addTree("ComingNextB", "ComingNextB");\r
$zip->writeToFileNamed("comingNextB.wgz");\r
\r
+$zip = Archive::Zip->new();\r
+$zip->addTree("ComingNextC", "ComingNextC");\r
+$zip->writeToFileNamed("comingNextC.wgz");\r
+\r
$zip = Archive::Zip->new();\r
$zip->addFile("comingNext.wgz");\r
$zip->addFile("comingNextB.wgz");\r
+$zip->addFile("comingNextC.wgz");\r
$zip->addFile("Readme.txt");\r
$zip->addFile("License.txt");\r
-$zip->addFile("ComingNext_SkinFetcher_v1.1.sisx");\r
+$zip->addFile("ComingNext_SkinFetcher_v1.3.sisx");\r
$zip->writeToFileNamed("comingNext_v$version.zip");\r
\r
#########################################\r