github/mage
1
0
Fork 0
mirror of https://github.com/correl/mage.git synced 2024-11-24 11:09:54 +00:00
Code Issues Projects Releases Packages Wiki Activity

Make perl script working on Linux.

Browse source
This commit is contained in:
rkfg 2016-02-26 21:02:25 +03:00
parent 9842199d6f
commit a2bc4d705a
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Utils/gen-simple-cards-by-set.pl
View file

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