diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-10 09:22:25 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-10 09:22:25 +0200 |
| commit | 8520659c0908a553a7c646fe788bbc64deea903b (patch) | |
| tree | 2cf34a90430c7ce5647ec7d41973e818dfa415d1 /lisp/mastodon-auth.el | |
| parent | 2e4ec6b3bb98d18eff6a6d2048cab82eb517fb20 (diff) | |
refactor concat-params-to-url, replace append-query string
Diffstat (limited to 'lisp/mastodon-auth.el')
| -rw-r--r-- | lisp/mastodon-auth.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mastodon-auth.el b/lisp/mastodon-auth.el index 0db8a19..e8ff282 100644 --- a/lisp/mastodon-auth.el +++ b/lisp/mastodon-auth.el @@ -41,7 +41,7 @@ (autoload 'mastodon-client--make-user-active "mastodon-client") (autoload 'mastodon-client--store-access-token "mastodon-client") (autoload 'mastodon-http--api "mastodon-http") -(autoload 'mastodon-http--append-query-string "mastodon-http") +(autoload 'mastodon-http--concat-params-to-url "mastodon-http") (autoload 'mastodon-http--get-json "mastodon-http") (autoload 'mastodon-http--post "mastodon-http") @@ -83,7 +83,7 @@ We apologize for the inconvenience. (defun mastodon-auth--get-browser-login-url () "Return properly formed browser login url." - (mastodon-http--append-query-string + (mastodon-http--concat-params-to-url (concat mastodon-instance-url "/oauth/authorize/") `(("response_type" "code") ("redirect_uri" ,mastodon-client-redirect-uri) |