mirror of
https://github.com/correl/mage.git
synced 2024-11-21 19:18:40 +00:00
Fix a couple of the perl scripts to work properly with the cards.f.FirstLetter style card class reorg
This commit is contained in:
parent
f119965f46
commit
1ce32eb24e
2 changed files with 2 additions and 2 deletions
|
@ -67,7 +67,7 @@ my $toPrint = '';
|
|||
|
||||
foreach my $card (sort cardSort @setCards) {
|
||||
my $className = toCamelCase(@{$card}[0]);
|
||||
my $currentFileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . $className . ".java";
|
||||
my $currentFileName = "../Mage.Sets/src/mage/cards/" . lc(substr($className, 0, 1)) . "/" . $className . ".java";
|
||||
if (-e $currentFileName) {
|
||||
if ($toPrint) {
|
||||
$toPrint .= "\n";
|
||||
|
|
|
@ -94,7 +94,7 @@ foreach my $card (sort cardSort @setCards) {
|
|||
|
||||
$cardNames {@{$card}[0]} = 1;
|
||||
|
||||
my $currentFileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . $className . ".java";
|
||||
my $currentFileName = "../Mage.Sets/src/mage/cards/" . lc(substr($className, 0, 1)) . "/" . $className . ".java";
|
||||
if(! -e $currentFileName) {
|
||||
$cardNames {@{$card}[0]} = 0;
|
||||
if ($toPrint) {
|
||||
|
|
Loading…
Reference in a new issue