From: Julien Danjou <julien@danjou.info>
Date: Sat, 8 Oct 2011 08:03:26 +0000 (+0200)
Subject: * oauth2.el: Require json.
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/7e75e85e7e1fe04510c2a11541a4268887184ee2

* oauth2.el: Require json.
  Fix compilation warning with success variable from url.el.
---

diff --git a/packages/oauth2/oauth2.el b/packages/oauth2/oauth2.el
index 7966e629b..3b57c05c1 100644
--- a/packages/oauth2/oauth2.el
+++ b/packages/oauth2/oauth2.el
@@ -36,6 +36,7 @@
 ;;; Code:
 
 (require 'plstore)
+(require 'json)
 
 (defun oauth2-request-authorization (auth-url client-id &optional scope state)
   "Request OAuth authorization at AUTH-URL by launching `browse-url'.
@@ -172,6 +173,10 @@ This allows to store the token in an unique way."
           (if (string-match-p "\?" url) "&" "?")
           "access_token=" (oauth2-token-access-token token)))
 
+;; Local variable from `url'
+;; defined here to avoid compile warning
+(defvar success)
+
 ;;;###autoload
 (defun oauth2-url-retrieve-synchronously (token url)
   "Retrieve an URL synchronously using TOKENS to access it.