aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--NEWS2
-rw-r--r--lib/MGA/Advisories.pm2
2 files changed, 3 insertions, 1 deletions
diff --git a/NEWS b/NEWS
index b10aeb6..1c23a7a 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- fix next free id assignement
+
Version 0.10
- add CVE links in references
diff --git a/lib/MGA/Advisories.pm b/lib/MGA/Advisories.pm
index 9ebe35e..64c128c 100644
--- a/lib/MGA/Advisories.pm
+++ b/lib/MGA/Advisories.pm
@@ -77,7 +77,7 @@ sub get_advisories_from_dir {
sub next_id {
my $prefix = shift;
my $year = DateTime->now->year;
- my $newid = (0, sort map { m/^$prefix-$year-(\d+)$/ ? int $1 : () } @_)[-1] + 1;
+ my $newid = (0, sort { $a <=> $b } map { m/^$prefix-$year-(\d+)$/ ? int $1 : () } @_)[-1] + 1;
return sprintf("%s-%s-%.4d", $prefix, $year, $newid);
}