[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/oauth2 ba35131 05/23: oauth2: allow to use any HTTP req
From: |
Stefan Monnier |
Subject: |
[elpa] externals/oauth2 ba35131 05/23: oauth2: allow to use any HTTP request type |
Date: |
Tue, 1 Dec 2020 16:31:58 -0500 (EST) |
branch: externals/oauth2
commit ba351311567dfb0134eb370f1eaa68fb4c0576b5
Author: Julien Danjou <julien@danjou.info>
Commit: Julien Danjou <julien@danjou.info>
oauth2: allow to use any HTTP request type
* oauth2: allow to use any HTTP request type
---
oauth2.el | 12 ++++++++----
1 file changed, 8 insertions(+), 4 deletions(-)
diff --git a/oauth2.el b/oauth2.el
index 3b57c05..7175606 100644
--- a/oauth2.el
+++ b/oauth2.el
@@ -178,7 +178,7 @@ This allows to store the token in an unique way."
(defvar success)
;;;###autoload
-(defun oauth2-url-retrieve-synchronously (token url)
+(defun oauth2-url-retrieve-synchronously (token url &optional request-method
request-data request-extra-headers)
"Retrieve an URL synchronously using TOKENS to access it.
TOKENS can be obtained with `oauth2-auth'."
(let (tokens-need-renew)
@@ -187,10 +187,14 @@ TOKENS can be obtained with `oauth2-auth'."
;; This is to make `url' think
;; it's done.
(setq success t)))
- (let ((url-buffer (url-retrieve-synchronously
- (oauth2-url-append-access-token token url))))
+ (let ((url-request-method request-method)
+ (url-request-data request-data)
+ (url-request-extra-headers request-extra-headers)
+ (url-buffer))
+ (setq url-buffer (url-retrieve-synchronously
+ (oauth2-url-append-access-token token url)))
(if tokens-need-renew
- (oauth2-url-retrieve-synchronously (oauth2-refresh-access token)
url)
+ (oauth2-url-retrieve-synchronously (oauth2-refresh-access token)
url request-method request-data request-extra-headers)
url-buffer)))))
(provide 'oauth2)
- [elpa] branch externals/oauth2 created (now 7619d08), Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 9e3794c 01/23: New package oauth2, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 384ae30 03/23: * packages/oauth2/oauth2.el (oauth2-request-authorization): Add missing, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 c1302df 06/23: oauth2: update version 0.2, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 7513425 07/23: * packages/oauth2/oauth2.el: Fix URL double escaping, update to 0.3, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 37cb216 12/23: oauth2: upgrade to 0.8, add missing require on cl, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 f4f8aca 13/23: oauth2: release 0.9, require url-http, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 e807082 02/23: * packages/oauth2/oauth2.el: Reformat to avoid long lines., Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 ba35131 05/23: oauth2: allow to use any HTTP request type,
Stefan Monnier <=
- [elpa] externals/oauth2 e94f9f1 08/23: * packages/oauth2/oauth2.el: Don't use aget, update to 0.4, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 a51dda4 04/23: * oauth2.el: Require json., Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 6824409 09/23: * packages/oauth2/oauth2.el: Revert fix URL double escaping, update to 0.5, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 d5e5e70 10/23: oauth2: add redirect-uri parameter, update to 0.6, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 1d352b3 17/23: Fix some quoting problems in doc strings, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 86a4afd 19/23: fix(oauth2): rename forgotten instance of resource-url -> scope, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 7619d08 23/23: * .gitignore: New file, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 61bcabe 16/23: oauth2: send authentication token via Authorization header, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 bf96d9f 11/23: oauth2: store access-reponse, bump versino to 0.7, Stefan Monnier, 2020/12/01
- [elpa] externals/oauth2 bcf36ae 18/23: feat(oauth2): add state parameter support, rename resource-url to scope, Stefan Monnier, 2020/12/01