diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2022-08-31 08:49:25 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2022-08-31 08:49:25 +0200 |
commit | 7672a0240b45675c1fde0ca960fea56c02ecc4ab (patch) | |
tree | 646d87b6683b0d049c73a5771eefabe09bcb4470 | |
parent | 43625baee1137335f8220348dfde4439aef048ae (diff) |
http--api in -profile.el
-rw-r--r-- | lisp/mastodon-profile.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 516059e..9c28703 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -212,8 +212,7 @@ JSON is the data returned by the server." (defun mastodon-profile--update-user-profile-note () "Fetch user's profile note and display for editing." (interactive) - (let* ((url (concat mastodon-instance-url - "/api/v1/accounts/update_credentials")) + (let* ((url (mastodon-http--api "accounts/update_credentials")) ;; (buffer (mastodon-http--patch url)) (json (mastodon-http--patch-json url)) (source (alist-get 'source json)) @@ -236,8 +235,7 @@ JSON is the data returned by the server." "Send PATCH request with the updated profile note." (interactive) (let* ((note (buffer-substring-no-properties (point-min) (point-max))) - (url (concat mastodon-instance-url - "/api/v1/accounts/update_credentials"))) + (url (mastodon-http--api "accounts/update_credentials"))) (kill-buffer-and-window) (let ((response (mastodon-http--patch url note))) (mastodon-http--triage response |