Index: www/p5-WWW-Curl/Makefile =================================================================== --- www/p5-WWW-Curl/Makefile (revision 514689) +++ www/p5-WWW-Curl/Makefile (working copy) @@ -3,7 +3,7 @@ PORTNAME= WWW-Curl PORTVERSION= 4.17 -PORTREVISION= 2 +PORTREVISION= 3 CATEGORIES= www ftp perl5 MASTER_SITES= CPAN \ http://curl.haxx.se/libcurl/perl/ Index: www/p5-WWW-Curl/files/patch-Curl.xs =================================================================== --- www/p5-WWW-Curl/files/patch-Curl.xs (revision 514689) +++ www/p5-WWW-Curl/files/patch-Curl.xs (working copy) @@ -1,6 +1,25 @@ ---- Curl.xs.orig 2019-09-17 09:12:44 UTC +--- Curl.xs.orig 2014-02-21 16:08:30 UTC +++ Curl.xs -@@ -73,7 +73,7 @@ typedef struct { +@@ -18,6 +18,10 @@ + #include + #include + ++#ifdef CURLINC_MULTI_H ++#define __CURL_MULTI_H ++#endif ++ + #define header_callback_func writeheader_callback_func + + /* Do a favor for older perl versions */ +@@ -38,6 +42,7 @@ typedef enum { + SLIST_HTTPHEADER = 0, + SLIST_QUOTE, + SLIST_POSTQUOTE, ++ SLIST_CONNECT_TO, + #ifdef CURLOPT_RESOLVE + SLIST_RESOLVE, + #endif +@@ -73,7 +78,7 @@ typedef struct { #ifdef __CURL_MULTI_H struct CURLM *curlm; #else @@ -9,3 +28,22 @@ #endif } perl_curl_multi; +@@ -129,6 +134,10 @@ slist_index(int option) + case CURLOPT_POSTQUOTE: + return SLIST_POSTQUOTE; + break; ++ case CURLOPT_CONNECT_TO: ++ return SLIST_CONNECT_TO; ++ break; ++ + #ifdef CURLOPT_RESOLVE + case CURLOPT_RESOLVE: + return SLIST_RESOLVE; +@@ -754,6 +763,7 @@ curl_easy_setopt(self, option, value, push=0) + case CURLOPT_HTTPHEADER: + case CURLOPT_QUOTE: + case CURLOPT_POSTQUOTE: ++ case CURLOPT_CONNECT_TO: + #ifdef CURLOPT_RESOLVE + case CURLOPT_RESOLVE: + #endif Index: www/p5-WWW-Curl/files/patch-Makefile.PL =================================================================== --- www/p5-WWW-Curl/files/patch-Makefile.PL (revision 514689) +++ www/p5-WWW-Curl/files/patch-Makefile.PL (working copy) @@ -1,6 +1,6 @@ --- Makefile.PL.orig 2014-02-21 16:08:09 UTC +++ Makefile.PL -@@ -121,6 +121,7 @@ if (!defined($curl_h)) { +@@ -121,13 +121,14 @@ if (!defined($curl_h)) { open (H, "<", $curl_h) or die ("Cannot open $curl_h: ".$!); while() { if (/^#define (CURL[A-Za-z0-9_]*)/) { @@ -8,3 +8,11 @@ push @syms, $1; } } + close H; + + for my $e (sort @syms) { +- if($e =~ /(OBSOLETE|^CURL_EXTERN|_LAST\z|_LASTENTRY\z)/) { ++ if($e =~ /(OBSOLETE|^CURL_EXTERN|_LAST\z|_LASTENTRY\z|^CURLINC_)/) { + next; + } + my ($group) = $e =~ m/^([^_]+_)/;