Skip to content

Commit b81a07a

Browse files
committed
library.pl: Add tags for devel Perls
Tag in a similar fashion to `latest` - provide a `latest-blead` and `devel` tag for the main development Perl build.
1 parent c04b88c commit b81a07a

File tree

1 file changed

+9
-3
lines changed

1 file changed

+9
-3
lines changed

library.pl

Lines changed: 9 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -2,6 +2,7 @@
22
use 5.014;
33
use strict;
44
use warnings;
5+
use Perl::Version;
56
use YAML::XS;
67

78
my %arches = (
@@ -21,7 +22,7 @@
2122

2223
sub suffix {
2324
my $suffix = shift;
24-
map { $_ eq 'latest' ? $suffix : $_ . '-' . $suffix } @_;
25+
map { $_ =~ /(latest|devel)/ ? $suffix : $_ . '-' . $suffix } @_;
2526
}
2627

2728
sub entry {
@@ -37,8 +38,13 @@ sub entry {
3738
push @versionAliases, join '.', @version[0 .. $i];
3839
}
3940

40-
push @versionAliases, 'latest';
41-
41+
if (Perl::Version->new($version)->version %2) {
42+
push @versionAliases, 'latest-blead', 'devel'
43+
}
44+
else {
45+
push @versionAliases, 'latest';
46+
}
47+
4248
(my $buildSuffix = $build) =~ s/^main,//;
4349
$buildSuffix =~ s/,/-/g;
4450
my @buildAliases = ($build eq 'main' ? @versionAliases : suffix $buildSuffix, @versionAliases);

0 commit comments

Comments
 (0)