emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/mastodon dd9bb17742 3/4: cursor-face prop for fave etc mar


From: ELPA Syncer
Subject: [nongnu] elpa/mastodon dd9bb17742 3/4: cursor-face prop for fave etc markers.
Date: Wed, 27 Sep 2023 10:01:25 -0400 (EDT)

branch: elpa/mastodon
commit dd9bb177429d55f550e767ab11926ee602c8fc9f
Author: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Commit: marty hiatt <martianhiatus [a t] riseup [d o t] net>

    cursor-face prop for fave etc markers.
    
    used to not break highlight-current-toot when inserting markers
---
 lisp/mastodon-toot.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index b546804f6d..a8c85d8033 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -315,8 +315,12 @@ Remove MARKER if REMOVE is non-nil, otherwise add it."
           (message "Oops: could not find marker '(%s)'" marker)))
       (unless remove
         (goto-char bol)
-        (insert (format "(%s) "
-                        (propertize marker 'face 'success)))))
+        (insert
+         (propertize
+          (format "(%s) "
+                  (propertize marker
+                              'face 'success))
+          'cursor-face 'mastodon-cursor-highlight-face))))
     (when at-byline-p
       ;; leave point after the marker:
       (unless remove



reply via email to

[Prev in Thread] Current Thread [Next in Thread]