v1.16

mikeduglas · Jun 28, 2017 · e17e512 · e17e512
1 parent 3bbea81
commit e17e512
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 4 deletions.
diff --git a/README.md b/README.md
@@ -1,6 +1,10 @@
 # libcurl
 libcurl for Clarion
 
+v1.16
+- FIX: TCurlClass.AddHttpHeader(STRING pHeader) now accepts unlimited HTTP header string (it was 255 characters).
+
+
 v1.15
 - CHG: TCurlMailClass.Server now accepts optional 3rd parameter for 'HELO/EHLO' command: curl.Server('smtp.gmail.com', 587, 'client.examples.com')
 - NEW: TCurlClass.SetDefaultProtocol PROCEDURE(STRING pSchema)

diff --git a/libsrc/libcurl.clw b/libsrc/libcurl.clw
@@ -1,5 +1,5 @@
-!** libcurl for Clarion v1.15
-!** 23.01.2017
+!** libcurl for Clarion v1.16
+!** 28.06.2017
 !** [email protected]
 
 
@@ -529,9 +529,9 @@ TCurlSList.AssignPtr          PROCEDURE(LONG pListPtr)
   SELF.plist = pListPtr
 
 TCurlSList.Append             PROCEDURE(STRING pData)
-szData                          CSTRING(256)
+szData                          CSTRING(LEN(pData) + 1)
   CODE
-  szData = CLIP(pData)
+  szData = pData
   SELF.plist = curl_slist_append(SELF.plist, szData)
   RETURN