From c8f6b2b08686739e16e09d3a8addc6d141dd2728 Mon Sep 17 00:00:00 2001 From: DongHun Kwak Date: Mon, 25 Jul 2022 08:08:15 +0900 Subject: Imported Upstream version 4.15 --- lib/WWW/Curl/Easy.pm | 2 +- lib/WWW/Curl/Form.pm | 2 +- lib/WWW/Curl/Share.pm | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/WWW/Curl') diff --git a/lib/WWW/Curl/Easy.pm b/lib/WWW/Curl/Easy.pm index cbb3281..f0e8454 100644 --- a/lib/WWW/Curl/Easy.pm +++ b/lib/WWW/Curl/Easy.pm @@ -4,7 +4,7 @@ use strict; use warnings; use Carp; -our $VERSION = '4.14'; +our $VERSION = '4.15'; use WWW::Curl (); use Exporter (); diff --git a/lib/WWW/Curl/Form.pm b/lib/WWW/Curl/Form.pm index 3a149f6..76e536e 100644 --- a/lib/WWW/Curl/Form.pm +++ b/lib/WWW/Curl/Form.pm @@ -3,7 +3,7 @@ use strict; use warnings; use Carp; -our $VERSION = '4.14'; +our $VERSION = '4.15'; use WWW::Curl (); use Exporter (); diff --git a/lib/WWW/Curl/Share.pm b/lib/WWW/Curl/Share.pm index c4ffad6..2bd9aff 100644 --- a/lib/WWW/Curl/Share.pm +++ b/lib/WWW/Curl/Share.pm @@ -19,8 +19,8 @@ sub AUTOLOAD { ( my $constname = $AUTOLOAD ) =~ s/.*:://; my $value = constant( $constname ); - if($!) { - croak("Undefined subroutine &$AUTOLOAD failed"); + if ($!) { + croak("Undefined subroutine &$AUTOLOAD failed for reasons of $!, constname was $constname, value was: $value"); } { -- cgit v1.2.3