aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-08-31 08:49:25 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-08-31 08:49:25 +0200
commit7672a0240b45675c1fde0ca960fea56c02ecc4ab (patch)
tree646d87b6683b0d049c73a5771eefabe09bcb4470
parent43625baee1137335f8220348dfde4439aef048ae (diff)
http--api in -profile.el
-rw-r--r--lisp/mastodon-profile.el6
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