Make perl script working on Linux.

This commit is contained in:
rkfg 2016-02-26 21:02:25 +03:00
parent 9842199d6f
commit a2bc4d705a

View file

@ -46,13 +46,13 @@ if(!exists $knownSets{$setName}) {
my $packageName = $knownSets{$setName};
$setName =~ s/"/\\"/g;
system("gen-existing-cards-by-set.pl \"$setName\"");
system("./gen-existing-cards-by-set.pl \"$setName\"");
# Generate missing simple cards
print "Simple cards generated: \n";
foreach my $cardName (@setCards) {
my $fileName = "../Mage.Sets/src/mage/sets/" . $packageName . "/" . toCamelCase(${$cardName}[0]) . ".java";
if(!-e $fileName) {
system("gen-card.pl \"${$cardName}[0]\" true");
system("./gen-card.pl \"${$cardName}[0]\" true");
}
}