* packages/oauth2/oauth2.el (oauth2-request-authorization): Add missing

[gnu-emacs-elpa] / packages / oauth2 / oauth2.el

diff --git a/packages/oauth2/oauth2.el b/packages/oauth2/oauth2.el
index fbe77f6517ea13d02daa94018f9377fbcfe2dd01..7966e629b245acd3635348f509c1f297682e2e3c 100644 (file)
--- a/packages/oauth2/oauth2.el
+++ b/packages/oauth2/oauth2.el
@@ -43,10 +43,10 @@ CLIENT-ID is the client id provided by the provider.
 It returns the code provided by the service."
   (browse-url (concat auth-url
                       (if (string-match-p "\?" auth-url) "&" "?")
-                      "client_id=" client-id
+                      "client_id=" (url-hexify-string client-id)
                       "&response_type=code&redirect_uri=urn:ietf:wg:oauth:2.0:oob"
                       (if scope (concat "&scope=" (url-hexify-string scope)) "")
-                      (if state (concat "&state=" state) "")))
+                      (if state (concat "&state=" (url-hexify-string state)) "")))
   (read-string "Enter the code your browser displayed: "))
 
 (defun oauth2-request-access-parse ()