spjspj - Print out a quick way to edit the file name from gen-card.pl

This commit is contained in:
spjspj 2016-04-07 21:55:42 +10:00
parent 32a8f3ddfc
commit 2e2a36395a

View file

@ -105,6 +105,10 @@ if (!exists $cards{$cardName}) {
foreach my $setName (keys %{$cards{$cardName}}) { foreach my $setName (keys %{$cards{$cardName}}) {
if (exists $knownSets{$setName}) { if (exists $knownSets{$setName}) {
my $fileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . toCamelCase($cardName) . ".java"; my $fileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . toCamelCase($cardName) . ".java";
print "gvim $fileName\n";
my $fileName2 = $fileName;
$fileName2 =~ s/\//\\/img;
print "gvim $fileName2\n";
if(-e $fileName) { if(-e $fileName) {
die "$cardName is already implemented (set found in: $setName).\n"; die "$cardName is already implemented (set found in: $setName).\n";
} }
@ -128,6 +132,10 @@ my $baseRarity = '';
foreach my $setName (keys %{$cards{$cardName}}) { foreach my $setName (keys %{$cards{$cardName}}) {
if (exists $knownSets{$setName}) { if (exists $knownSets{$setName}) {
my $fileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . toCamelCase($cardName) . ".java"; my $fileName = "../Mage.Sets/src/mage/sets/" . $knownSets{$setName} . "/" . toCamelCase($cardName) . ".java";
print "gvim $fileName\n";
my $fileName2 = $fileName;
$fileName2 =~ s/\//\\/img;
print "gvim $fileName2\n";
my $result; my $result;
$vars{'set'} = $knownSets{$setName}; $vars{'set'} = $knownSets{$setName};