aboutsummaryrefslogtreecommitdiff
path: root/perl
diff options
context:
space:
mode:
authorDaniel Stenberg <daniel@haxx.se>2001-04-20 06:49:58 +0000
committerDaniel Stenberg <daniel@haxx.se>2001-04-20 06:49:58 +0000
commita44a8cef993af60fea1e30f7572bbddac0d5a810 (patch)
treee8a0b4a3838464184be7edd5eb35f69da38cd28c /perl
parent97ad165a63908f8fd459e14430b0db301ad4f315 (diff)
downloadgnurl-a44a8cef993af60fea1e30f7572bbddac0d5a810.tar.gz
gnurl-a44a8cef993af60fea1e30f7572bbddac0d5a810.tar.bz2
gnurl-a44a8cef993af60fea1e30f7572bbddac0d5a810.zip
Cris Bailiff's 1.1.4 changes: Fix case where curl_slists such as 'HTTPHEADERS'
need to be re-set over persistant requests
Diffstat (limited to 'perl')
-rw-r--r--perl/Curl_easy/Changes4
-rw-r--r--perl/Curl_easy/easy.pm2
-rw-r--r--perl/Curl_easy/easy.xs5
3 files changed, 10 insertions, 1 deletions
diff --git a/perl/Curl_easy/Changes b/perl/Curl_easy/Changes
index 11d45e5af..da7171392 100644
--- a/perl/Curl_easy/Changes
+++ b/perl/Curl_easy/Changes
@@ -1,6 +1,10 @@
Revision history for Perl extension Curl::easy.
Check out the file README for more info.
+1.1.4 Fri Apr 20 2001: - Cris Bailiff <c.bailiff@devsecure.com>
+ - Fix case where curl_slists such as 'HTTPHEADERS' need to
+ be re-set over persistant requests
+
1.1.3 Wed Apr 18 2001: - Cris Bailiff <c.bailiff@devsecure.com>
- Change/shorten module function names: Curl::easy::curl_easy_setopt
becomes Curl::easy::setopt etc. This requires minor changes to existing
diff --git a/perl/Curl_easy/easy.pm b/perl/Curl_easy/easy.pm
index e484a28f2..267700907 100644
--- a/perl/Curl_easy/easy.pm
+++ b/perl/Curl_easy/easy.pm
@@ -95,7 +95,7 @@ CURLINFO_REQUEST_SIZE
USE_INTERNAL_VARS
);
-$VERSION = '1.1.3';
+$VERSION = '1.1.4';
$Curl::easy::headers = "";
$Curl::easy::content = "";
diff --git a/perl/Curl_easy/easy.xs b/perl/Curl_easy/easy.xs
index 50b70280b..bcda42736 100644
--- a/perl/Curl_easy/easy.xs
+++ b/perl/Curl_easy/easy.xs
@@ -616,6 +616,11 @@ CODE:
case CURLOPT_POSTQUOTE:
slist = &postquote; break;
}
+ /* free any previous list */
+ if (*slist) {
+ curl_slist_free_all(*slist);
+ *slist=NULL;
+ }
/* ...store the values into it... */
for (;;) {
SV *sv = av_shift(array);