diff options
author | mousebot <mousebot@riseup.net> | 2022-02-13 14:43:37 +0100 |
---|---|---|
committer | mousebot <mousebot@riseup.net> | 2022-02-13 14:43:37 +0100 |
commit | c2db155596724b9fdbef2132811009e7d24bf86d (patch) | |
tree | 1936ca09032d325d6a5530f47b90d6e390bd014c /lisp/mastodon-media.el | |
parent | 33d9a8cc60b74c30417e320d7fb65a06b4a05701 (diff) | |
parent | 67a9c5eb13a633c7d19e2870bda42406abb015fa (diff) |
Merge branch 'develop'
Diffstat (limited to 'lisp/mastodon-media.el')
-rw-r--r-- | lisp/mastodon-media.el | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/lisp/mastodon-media.el b/lisp/mastodon-media.el index 4e4a15d..9441bdb 100644 --- a/lisp/mastodon-media.el +++ b/lisp/mastodon-media.el @@ -272,6 +272,20 @@ Replace them with the referenced image." (put-text-property start end 'media-state 'loading) (mastodon-media--load-image-from-url image-url media-type start (- end start)))))))) + ;; (mastodon-media--moving-image-overlay start end))))))) + +;; (defun mastodon-media--moving-image-overlay (start end) +;; "Add play symbol overlay to moving image media items." +;; (let ((ov (make-overlay start end)) +;; (type (get-text-property start 'mastodon-media-type))) +;; (when (or (equal type "gifv") +;; (equal type "video")) +;; (overlay-put +;; ov +;; 'after-string +;; (propertize " " +;; 'face +;; '((:height 1.5 :inherit 'font-lock-comment-face))))))) (defun mastodon-media--get-avatar-rendering (avatar-url) "Return the string to be written that renders the avatar at AVATAR-URL." @@ -312,7 +326,7 @@ TYPE is the attachment's type field on the server." 'keymap mastodon-tl--shr-image-map-replacement 'help-echo (if (string= type "image") help-echo - (concat help-echo "\ntype: " type))) + (concat help-echo "\nC-RET: play " type " with mpv"))) " "))) (provide 'mastodon-media) |