http.client: use new http-post* word.

diff --git a/basis/furnace/recaptcha/recaptcha.factor b/basis/furnace/recaptcha/recaptcha.factor
index 3ae20f14bbf9df2779bc4aa473bef4a1c05a5d2e..2e9af622d04a671bb97b71354a3b70b23fa6b8c6 100644 (file)
--- a/basis/furnace/recaptcha/recaptcha.factor
+++ b/basis/furnace/recaptcha/recaptcha.factor
@@ -59,7 +59,7 @@ M: recaptcha call-responder*
         { "privatekey" private-key }
         { "remoteip" remote-ip }
     } URL" http://api-verify.recaptcha.net/verify"
-    http-post nip parse-recaptcha-response ;
+    http-post* parse-recaptcha-response ;
 
 : validate-recaptcha-params ( -- )
     {

diff --git a/extra/google/charts/charts.factor b/extra/google/charts/charts.factor
index d97a97bceb1ffaf1e620c01dd6abed32feda0016..39a615043e9e1699949bc3d6037839df28c0837e 100644 (file)
--- a/extra/google/charts/charts.factor
+++ b/extra/google/charts/charts.factor
@@ -100,6 +100,6 @@ PRIVATE>
 
 : chart. ( chart -- )
     chart>url present dup length 2000 < [ http-image. ] [
-        "?" split1 swap http-post nip
+        "?" split1 swap http-post*
         "png" (image-class) load-image* image.
     ] if ;

diff --git a/extra/google/translate/translate.factor b/extra/google/translate/translate.factor
index c08ed8979a59a79b4ea3a87819e8dc2802d7ad6c..26fbbbbb577ee883855bba51676cb687fe6662d7 100644 (file)
--- a/extra/google/translate/translate.factor
+++ b/extra/google/translate/translate.factor
@@ -16,7 +16,7 @@ CONSTANT: maximum-translation-size 5120
     ] { } make ;
 
 : assoc>query-response ( assoc -- response )
-    google-translate-url http-post nip ;
+    google-translate-url http-post* ;
 
 ERROR: response-error response error ;