From 6b9cb8e156a2f43e77d743390fe103cb657e0b0c Mon Sep 17 00:00:00 2001 From: Mickey Nasriachi Date: Thu, 7 Nov 2024 08:39:50 +0100 Subject: [PATCH 1/2] tidy --- lib/MetaCPAN/Contributor.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/MetaCPAN/Contributor.pm b/lib/MetaCPAN/Contributor.pm index a10c2d2..033dde4 100644 --- a/lib/MetaCPAN/Contributor.pm +++ b/lib/MetaCPAN/Contributor.pm @@ -197,9 +197,9 @@ sub get_contributors ( $author_name, $release_name ) { my $check_author = $es->search( type => 'author', body => { - query => { term => { email => [ sort keys %want_email ] } }, + query => { term => { email => [ sort keys %want_email ] } }, _source => [ 'email', 'pauseid' ], - size => 10, + size => 10, } ); From db4a74ceaa9e0caefeef2b529a2f98c2010eaed1 Mon Sep 17 00:00:00 2001 From: Mickey Nasriachi Date: Tue, 12 Nov 2024 08:46:13 +0100 Subject: [PATCH 2/2] Packages: fix dist_version, follow a change in api --- bin/package.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/bin/package.pl b/bin/package.pl index 3662ffa..276f140 100644 --- a/bin/package.pl +++ b/bin/package.pl @@ -8,6 +8,7 @@ use MetaCPAN::ES; use MetaCPAN::Ingest qw< + fix_version read_02packages_fh >; @@ -40,7 +41,7 @@ file => $file, author => $distinfo->cpanid, distribution => $distinfo->dist, - dist_version => $distinfo->version, + dist_version => fix_version( $distinfo->version ), }; $bulk->update( {