aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-profile.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-08-30 09:17:49 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-08-30 09:17:49 +0200
commit28b12f4eb895fe1775cac1ec217733f5fa2ea810 (patch)
tree4c9b05fb5cd03b98691fdccde67d8fbc6734ad9a /lisp/mastodon-profile.el
parentafb3ac38e0e9738d73a5cd1cb5d5b63f059b781a (diff)
parent756096757d13f13f7262ad616e4206ded538566d (diff)
Merge branch 'scratch/mastodon' into develop
Diffstat (limited to 'lisp/mastodon-profile.el')
-rw-r--r--lisp/mastodon-profile.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index a5abe5a..0a3a236 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -250,14 +250,14 @@ NO-REBLOGS means do not display boosts in statuses."
(mastodon-tl--set-buffer-spec (buffer-name buffer) "accounts/verify_credentials" nil)
(setq-local header-line-format
(propertize msg-str
- 'face font-lock-comment-face))
+ 'face 'font-lock-comment-face))
(mastodon-profile-update-mode t)
(insert (propertize (concat (propertize "0"
'note-counter t
'display nil)
"/500 characters")
'read-only t
- 'face font-lock-comment-face
+ 'face 'font-lock-comment-face
'note-header t)
"\n")
(make-local-variable 'after-change-functions)
@@ -827,7 +827,7 @@ Currently limited to 100 handles. If not found, try
(response (mastodon-http--get-json url `(("limit" . "100"))))
(handles (mastodon-tl--map-alist-vals-to-alist 'acct 'id response))
(choice (completing-read "Remove from followers: " handles))
- (id (alist-get choice handles nil nil 'equal)))
+ (id (alist-get choice handles)))
(mastodon-profile--remove-user-from-followers id)))
(defun mastodon-profile--add-private-note-to-account ()