From 05c42b95f48d57ac0d06a9a5c4cd910db77f073b Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Fri, 19 Aug 2022 10:19:05 +0200
Subject: use bookmark emoji if possible

---
 lisp/mastodon-tl.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'lisp')

diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 168523b..d955a5e 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -547,7 +547,10 @@ By default it is `mastodon-tl--byline-boosted'"
              (when faved
                (mastodon-tl--format-faved-or-boosted-byline "F"))
              (when bookmarked
-               (mastodon-tl--format-faved-or-boosted-byline "K")))
+               (mastodon-tl--format-faved-or-boosted-byline
+                (if (fontp (char-displayable-p #10r128278))
+                    "🔖"
+                  "K"))))
      (propertize
       (concat
        ;; we propertize help-echo format faves for author name
@@ -583,7 +586,7 @@ LETTER is a string, F for favourited, B for boosted, or K for bookmarked."
                             "favourited")
                            ((equal letter "B")
                             "boosted")
-                           ((equal letter "K")
+                           ((equal letter (or "🔖" "K"))
                             "bookmarked"))))
     (format "(%s) "
             (propertize letter 'face 'mastodon-boost-fave-face
-- 
cgit v1.2.3