You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
56 lines
1.3 KiB
56 lines
1.3 KiB
--- a/Curl.xs
|
|
+++ b/Curl.xs
|
|
@@ -70,7 +70,7 @@
|
|
|
|
|
|
typedef struct {
|
|
-#ifdef __CURL_MULTI_H
|
|
+#ifdef CURLINC_MULTI_H
|
|
struct CURLM *curlm;
|
|
#else
|
|
struct void *curlm;
|
|
@@ -234,7 +234,7 @@
|
|
{
|
|
perl_curl_multi *self;
|
|
Newz(1, self, 1, perl_curl_multi);
|
|
-#ifdef __CURL_MULTI_H
|
|
+#ifdef CURLINC_MULTI_H
|
|
self->curlm=curl_multi_init();
|
|
#else
|
|
croak("curl version too old to support curl_multi_init()");
|
|
@@ -245,7 +245,7 @@
|
|
/* delete the multi */
|
|
static void perl_curl_multi_delete(perl_curl_multi *self)
|
|
{
|
|
-#ifdef __CURL_MULTI_H
|
|
+#ifdef CURLINC_MULTI_H
|
|
if (self->curlm)
|
|
curl_multi_cleanup(self->curlm);
|
|
Safefree(self);
|
|
@@ -1065,7 +1065,7 @@
|
|
WWW::Curl::Multi curlm
|
|
WWW::Curl::Easy curl
|
|
CODE:
|
|
-#ifdef __CURL_MULTI_H
|
|
+#ifdef CURLINC_MULTI_H
|
|
curl_multi_add_handle(curlm->curlm, curl->curl);
|
|
#endif
|
|
|
|
@@ -1074,7 +1074,7 @@
|
|
WWW::Curl::Multi curlm
|
|
WWW::Curl::Easy curl
|
|
CODE:
|
|
-#ifdef __CURL_MULTI_H
|
|
+#ifdef CURLINC_MULTI_H
|
|
curl_multi_remove_handle(curlm->curlm, curl->curl);
|
|
#endif
|
|
|
|
@@ -1149,7 +1149,7 @@
|
|
PREINIT:
|
|
int remaining;
|
|
CODE:
|
|
-#ifdef __CURL_MULTI_H
|
|
+#ifdef CURLINC_MULTI_H
|
|
while(CURLM_CALL_MULTI_PERFORM ==
|
|
curl_multi_perform(self->curlm, &remaining));
|
|
RETVAL = remaining;
|