From 219e571fd630db1aceac87ae2a1dab7f5b3b706f Mon Sep 17 00:00:00 2001 From: "H.Merijn Brand - Tux" Date: Tue, 18 Jun 2024 13:04:59 +0200 Subject: [PATCH] Tested with perl-5.40.0 --- ChangeLog | 3 ++- cpanfile | 4 ++-- sandbox/genMETA.pl | 4 ++-- sandbox/genMETA.pm | 7 ++++--- 4 files changed, 10 insertions(+), 8 deletions(-) diff --git a/ChangeLog b/ChangeLog index 1279ef3..0cfd501 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,6 @@ -0.009 - 2024-04-16, H.Merijn Brand +0.009 - 2024-06-18, H.Merijn Brand * Require HTTP::Tiny 0.025 + * Tested with perl-5.40.0 0.008 - 2024-04-08, H.Merijn Brand * Prevent warning if report is incomplete diff --git a/cpanfile b/cpanfile index 2a03d91..db3ba31 100644 --- a/cpanfile +++ b/cpanfile @@ -5,7 +5,7 @@ requires "IO::Socket::SSL" => "1.42"; requires "JSON::MaybeXS" => "1.004005"; requires "List::Util"; -recommends "Data::Dumper" => "2.188"; +recommends "Data::Dumper" => "2.189"; recommends "Data::Peek" => "0.52"; recommends "HTTP::Tiny" => "0.088"; recommends "IO::Socket::SSL" => "2.085"; @@ -22,5 +22,5 @@ on "test" => sub { requires "Test::More" => "0.90"; requires "Test::Warnings"; - recommends "Test::More" => "1.302198"; + recommends "Test::More" => "1.302199"; }; diff --git a/sandbox/genMETA.pl b/sandbox/genMETA.pl index a4fcec7..9b19e3d 100755 --- a/sandbox/genMETA.pl +++ b/sandbox/genMETA.pl @@ -67,11 +67,11 @@ ExtUtils::MakeMaker: 7.22 recommends: Data::Peek: 0.52 - Data::Dumper: 2.188 + Data::Dumper: 2.189 HTTP::Tiny: 0.088 IO::Socket::SSL: 2.085 test_recommends: - Test::More: 1.302198 + Test::More: 1.302199 configure_suggests: ExtUtils::MakeMaker: 7.70 resources: diff --git a/sandbox/genMETA.pm b/sandbox/genMETA.pm index 1e85457..6c82541 100644 --- a/sandbox/genMETA.pm +++ b/sandbox/genMETA.pm @@ -2,7 +2,7 @@ package genMETA; -our $VERSION = "1.14-20230522"; +our $VERSION = "1.15-20231007"; use 5.014001; use warnings; @@ -66,7 +66,7 @@ sub version_from { croak RED, "Makefile wants version from nonexisten $from", RESET, "\n"; $self->{from} //= $from; $from eq $self->{from} or - croak RED, "VERSION_FROM mismatch Makefile.PL / YAML", RESET, "\n"; + croak RED, "VERSION_FROM mismatch Makefile.PL ($from) / YAML ($self->{from})", RESET, "\n"; } if ($mf =~ m[\b PREREQ_PM \s*=>\s* \{ ( [^}]+ ) \}]x) { @@ -182,7 +182,7 @@ sub check_required { $v eq $vsn{$_} and next; printf STDERR "%s%-35s %-6s => %s%s%s\n", BLUE, $_, $vsn{$_}, GREEN, $v, RESET; } - if (my @mfpr = sort keys %{$self->{mfpr}}) { + if (my @mfpr = grep { $_ ne "version" } sort keys %{$self->{mfpr}}) { croak RED, "Makefile.PL requires @mfpr, YAML does not", RESET, "\n"; } @@ -543,6 +543,7 @@ sub _cpfd { sub gen_cpanfile { my $self = shift; + warn "Generating cpanfile ...\n"; open my $fh, ">", "cpanfile"; my $jsn = $self->{h};