diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-26 11:27:33 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-26 11:27:33 +0200 |
commit | a13a7d8f8e45f26e15d9509f5549c1decc9398ce (patch) | |
tree | 9d319cdb51b2a0afc8a158a062e21d1629957bbf /lisp | |
parent | e97dc9dbf258d3cee1f0a0a0d1bfa1e733aa0f62 (diff) |
tiny cleanup of view-instance-description (uncallable code)
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mastodon-views.el | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el index 7d5ac1e..9809365 100644 --- a/lisp/mastodon-views.el +++ b/lisp/mastodon-views.el @@ -724,10 +724,7 @@ INSTANCE is an instance domain name." (interactive) (if user (let ((response (mastodon-http--get-json - (mastodon-http--api "instance") - nil ; params - nil ; silent - :vector))) + (mastodon-http--api "instance") nil nil :vector))) (mastodon-views--instance-response-fun response brief instance)) (mastodon-tl--do-if-toot (let* ((toot (if (mastodon-tl--profile-buffer-p) @@ -755,12 +752,7 @@ INSTANCE is an instance domain name." (alist-get 'username account))) (instance (mastodon-views--get-instance-url url username instance)) (response (mastodon-http--get-json - (if user - (mastodon-http--api "instance") - (concat instance "/api/v1/instance")) - nil ; params - nil ; silent - :vector))) + (concat instance "/api/v1/instance") nil nil :vector))) (mastodon-views--instance-response-fun response brief instance))))) (defun mastodon-views--instance-response-fun (response brief instance) |