From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Arun Isaac Newsgroups: gmane.lisp.guile.bugs Subject: bug#30154: [PATCH] web: Add http-patch. Date: Thu, 18 Jan 2018 15:13:10 +0530 Message-ID: <20180118094310.11658-1-arunisaac@systemreboot.net> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-Trace: blaine.gmane.org 1516268558 29456 195.159.176.226 (18 Jan 2018 09:42:38 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Thu, 18 Jan 2018 09:42:38 +0000 (UTC) To: 30154@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Thu Jan 18 10:42:33 2018 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ec6i3-00067X-11 for guile-bugs@m.gmane.org; Thu, 18 Jan 2018 10:42:11 +0100 Original-Received: from localhost ([::1]:47256 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ec6k2-0001ye-T3 for guile-bugs@m.gmane.org; Thu, 18 Jan 2018 04:44:14 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:48479) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ec6js-0001xc-SA for bug-guile@gnu.org; Thu, 18 Jan 2018 04:44:10 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1ec6jq-0006TG-80 for bug-guile@gnu.org; Thu, 18 Jan 2018 04:44:04 -0500 Original-Received: from debbugs.gnu.org ([208.118.235.43]:53045) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1ec6jq-0006TB-4D for bug-guile@gnu.org; Thu, 18 Jan 2018 04:44:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1ec6jp-0000Ut-VB for bug-guile@gnu.org; Thu, 18 Jan 2018 04:44:01 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Arun Isaac Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Thu, 18 Jan 2018 09:44:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 30154 X-GNU-PR-Package: guile X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.15162686291881 (code B ref -1); Thu, 18 Jan 2018 09:44:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 18 Jan 2018 09:43:49 +0000 Original-Received: from localhost ([127.0.0.1]:60942 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ec6jc-0000UH-VZ for submit@debbugs.gnu.org; Thu, 18 Jan 2018 04:43:49 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:57366) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ec6jb-0000U5-HF for submit@debbugs.gnu.org; Thu, 18 Jan 2018 04:43:48 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1ec6jV-0006JN-9O for submit@debbugs.gnu.org; Thu, 18 Jan 2018 04:43:42 -0500 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:58361) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1ec6jV-0006JG-5h for submit@debbugs.gnu.org; Thu, 18 Jan 2018 04:43:41 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:48297) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ec6jT-0001sG-T4 for bug-guile@gnu.org; Thu, 18 Jan 2018 04:43:40 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1ec6jR-0006GD-7G for bug-guile@gnu.org; Thu, 18 Jan 2018 04:43:39 -0500 Original-Received: from [2001:19f0:5:274f:4827:c39:448f:6777] (port=46796 helo=vultr.systemreboot.net) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1ec6jQ-0006De-ER for bug-guile@gnu.org; Thu, 18 Jan 2018 04:43:37 -0500 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=systemreboot.net; s=default; h=Content-Transfer-Encoding:Content-Type: MIME-Version:Message-Id:Date:Subject:Cc:To:From:Sender:Reply-To:Content-ID: Content-Description:Resent-Date:Resent-From:Resent-Sender:Resent-To:Resent-Cc :Resent-Message-ID:In-Reply-To:References:List-Id:List-Help:List-Unsubscribe: List-Subscribe:List-Post:List-Owner:List-Archive; bh=igcdkfLxJjZz7IEF5fEsg1Frcjz+49E+Ioad74kKCpA=; b=VVOONnKWasIY6yoopsDGz3Jt8a l2uBs6KhldSfkH13iNGn7lmIt7nVtxfyCxadX1VO/S4W4uAhwS+y7Kiw8GSd05hAAhFPERaQ43mrd /2ZB8EaMMwXLLuX4DUV+7sMTlY5VuAMOd0zT3lTsMjn2O0MRSKWrZnsL2QBlIBbjlMF4=; Original-Received: from [117.192.108.94] (helo=localhost.localdomain) by systemreboot.net with esmtpsa (TLSv1.2:ECDHE-RSA-AES128-GCM-SHA256:128) (Exim 4.90) (envelope-from ) id 1ec6jL-00006P-5V; Thu, 18 Jan 2018 15:13:31 +0530 X-Mailer: git-send-email 2.15.1 X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.org gmane.lisp.guile.bugs:8973 Archived-At: * 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... +@deffnx {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