Skip to content

Commit 946ffd2

Browse files
authored
Merge pull request #1375 from metacpan/haarg/fix-author-links
fix author links to include backpan and https links
2 parents adce273 + 53720fa commit 946ffd2

File tree

2 files changed

+10
-6
lines changed

2 files changed

+10
-6
lines changed

lib/MetaCPAN/Query/Release.pm

Lines changed: 9 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -22,12 +22,16 @@ sub author_status {
2222

2323
my ( $id_2, $id_1 ) = $id =~ /^((\w)\w)/;
2424
$status->{links} = {
25-
cpan_directory => "http://cpan.org/authors/id/$id_1/$id_2/$id",
26-
cpants => "http://cpants.cpanauthors.org/author/$id",
25+
cpan_directory =>
26+
"https://www.cpan.org/authors/id/$id_1/$id_2/$id",
27+
backpan_directory =>
28+
"https://cpan.metacpan.org/authors/id/$id_1/$id_2/$id",
29+
cpants => "https://cpants.cpanauthors.org/author/$id",
2730
cpantesters_reports =>
28-
"http://cpantesters.org/author/$id_1/$id.html",
29-
cpantesters_matrix => "http://matrix.cpantesters.org/?author=$id",
30-
metacpan_explorer =>
31+
"https://www.cpantesters.org/author/$id_1/$id.html",
32+
cpantesters_matrix =>
33+
"https://matrix.cpantesters.org/?author=$id",
34+
metacpan_explorer =>
3135
"https://explorer.metacpan.org/?url=/author/$id",
3236
repology => "https://repology.org/maintainer/$id%40cpan",
3337
};

t/server/controller/author.t

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -89,7 +89,7 @@ test_psgi app, sub {
8989
is_deeply(
9090
[ sort keys %{$links} ],
9191
[
92-
qw< cpan_directory cpantesters_matrix cpantesters_reports cpants metacpan_explorer repology>
92+
qw< backpan_directory cpan_directory cpantesters_matrix cpantesters_reports cpants metacpan_explorer repology>
9393
],
9494
'links has the correct keys'
9595
);

0 commit comments

Comments
 (0)