]> code.delx.au - gnu-emacs-elpa/commitdiff
* oauth2.el: Require json.
authorJulien Danjou <julien@danjou.info>
Sat, 8 Oct 2011 08:03:26 +0000 (10:03 +0200)
committerJulien Danjou <julien@danjou.info>
Sat, 8 Oct 2011 08:03:26 +0000 (10:03 +0200)
  Fix compilation warning with success variable from url.el.

packages/oauth2/oauth2.el

index 7966e629b245acd3635348f509c1f297682e2e3c..3b57c05c17664374b6cc0f15bafcdc521e6090e1 100644 (file)
@@ -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.