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

Fix the 'find_new_cards.pl'

Browse source
This commit is contained in:
spjspj 2017-06-07 08:50:39 +10:00
parent 1df0e62e00
commit e3594fd9d1
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Utils/find_new_cards.pl
View file

@ -8,16 +8,18 @@ my $addedCards;
my $GIT_CMD = "C:\\Program Files (x86)\\Git\\bin\\git.exe";
my $text = `\"$GIT_CMD\" tag`;
print "Assuming the tag command is on: \"$GIT_CMD\" tag\n";
my @lines = split /\n/, $text;
my %order_of_tags;
my $tag;
foreach $tag (@lines)
{
my $orig_num = $tag;
my $num = $tag;
if ($num =~ m/(\d+)\.(\d+).(\d+)v(\d+)/img)
{
$num = $1 * 2000 + $2 * 100 + $3 * 20 + $1;
$num = $1 * 2000 + $2 * 100 + $3 * 20 + $4;
$order_of_tags {$num} = $tag;
}
}