aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-06-03 16:36:07 +0200
committermarty hiatt <martianhiatus@riseup.net>2024-06-03 16:36:07 +0200
commit5e7e38a81a99e110ec62c0ccc622eb3c4b476cbc (patch)
tree070371c6dd275396c289811049a5070df949d4d9 /lisp
parentb4fc0f52b8737d761353df995eae9ebd1e084c40 (diff)
boxed face for "pinned" in profile view
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-profile.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index b96caa0..069334a 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -573,7 +573,11 @@ FIELDS means provide a fields vector fetched by other means."
(defun mastodon-profile--insert-statuses-pinned (pinned-statuses)
"Insert each of the PINNED-STATUSES for a given account."
(mapc (lambda (pinned-status)
- (insert (mastodon-tl--set-face " :pinned: " 'success))
+ (insert
+ (concat " "
+ (propertize " pinned "
+ 'face '(:inherit success :box t))
+ " "))
(mastodon-tl--toot pinned-status))
pinned-statuses))