branch: elpa/mastodon
commit 486a4f174ee7355f410ef556bcee77145ad59d00
Author: marty hiatt <[email protected]>
Commit: marty hiatt <[email protected]>
fix quoted text button (no buttonify-link) (no underscores)
---
lisp/mastodon-tl.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 8488e53658..c22ad2c2e3 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -1957,8 +1957,8 @@ TOOT is the data for the quoting toot."
(propertize
;; quoted text:
(concat
- "\n\n"
- (mastodon-tl--buttonify-link
+ "\n"
+ (propertize ;; button quoted toot
(concat
quotemark "\n"
;; author byline without horiz bar and toot stats:
@@ -1968,6 +1968,8 @@ TOOT is the data for the quoting toot."
;; quoted text:
(mastodon-tl--render-text content
(alist-get 'quoted_status data)))
+ 'button t
+ 'keymap mastodon-tl--link-keymap
'help-echo "Load quoted toot"
'mouse-face '(:inherit (highlight link) :underline nil)))
'line-prefix bar
