mirror of
https://github.com/correl/mage.git
synced 2024-12-24 11:50:45 +00:00
Merge pull request #3474 from spjspj/master
Fix the 'find_new_cards.pl'
This commit is contained in:
commit
ae569e3184
1 changed files with 3 additions and 1 deletions
|
@ -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;
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue