add PATCH http method

[factor.git] / basis / http / client / client.factor

diff --git a/basis/http/client/client.factor b/basis/http/client/client.factor
index b0bad5ff61ea2a61dfbed85dcb77747d1188a78b..236a203bc8ec844fa42cbb69d2be6a7c80e3d333 100644 (file)
--- a/basis/http/client/client.factor
+++ b/basis/http/client/client.factor
@@ -335,6 +335,15 @@ PRIVATE>
 : http-options* ( url -- response data )
     <options-request> http-request* ;
 
+: <patch-request> ( url -- request )
+    "PATCH" <client-request> ;
+
+: http-patch ( url -- response data )
+    <patch-request> http-request ;
+
+: http-patch* ( url -- response data )
+    <patch-request> http-request* ;
+
 : <trace-request> ( url -- request )
     "TRACE" <client-request> ;