bug#30154: [PATCH] web: Add http-patch.

[Arun Isaac]

* module/web/client.scm (http-patch): New HTTP verb.
* doc/ref/web.texi (Web Client): Document it.
---
 doc/ref/web.texi      |  1 +
 module/web/client.scm | 12 ++++++++++++
 2 files changed, 13 insertions(+)

diff --git a/doc/ref/web.texi b/doc/ref/web.texi
index 07da5b64b..7f119ba99 100644
--- a/doc/ref/web.texi
+++ b/doc/ref/web.texi
@@ -1467,6 +1467,7 @@ GnuTLS-Guile}, for more information.
 @deffnx {Scheme Procedure} http-head uri arg...
 @deffnx {Scheme Procedure} http-post uri arg...
 @deffnx {Scheme Procedure} http-put uri arg...
address@hidden {Scheme Procedure} http-patch uri arg...
 @deffnx {Scheme Procedure} http-delete uri arg...
 @deffnx {Scheme Procedure} http-trace uri arg...
 @deffnx {Scheme Procedure} http-options uri arg...
diff --git a/module/web/client.scm b/module/web/client.scm
index c13117dd2..24278d772 100644
--- a/module/web/client.scm
+++ b/module/web/client.scm
@@ -51,6 +51,7 @@
             http-head
             http-post
             http-put
+            http-patch
             http-delete
             http-trace
             http-options))
@@ -461,6 +462,17 @@ arguments that are accepted by this function.
 
 Returns two values: the resulting response, and the response body.")
 
+(define-http-verb http-patch
+  'PATCH
+  "Make partial changes to the resource at the given URI using the HTTP
+\"PATCH\" method.
+
+This function is similar to ‘http-get’, except it uses the \"PATCH\"
+method.  See ‘http-get’ for full documentation on the various keyword
+arguments that are accepted by this function.
+
+Returns two values: the resulting response, and the response body.")
+
 (define-http-verb http-delete
   'DELETE
   "Delete data at the given URI using the HTTP \"DELETE\" method.
-- 
2.15.1