aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-media.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mastodon-media.el')
-rw-r--r--lisp/mastodon-media.el28
1 files changed, 14 insertions, 14 deletions
diff --git a/lisp/mastodon-media.el b/lisp/mastodon-media.el
index 3789d5d..54d5430 100644
--- a/lisp/mastodon-media.el
+++ b/lisp/mastodon-media.el
@@ -271,21 +271,21 @@ Replace them with the referenced image."
;; proceed to load this image asynchronously
(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)))))))
+ 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--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."