From 53a1b5c2488b329a0857c94dad837ac164d2446e Mon Sep 17 00:00:00 2001
From: Holger Dürer <me@hdurer.net>
Date: Fri, 5 May 2017 22:19:02 +0100
Subject: Show users' avatars plus other image work.

- Shows users' avatars (makes only sense if Emacs is built with imagemagick)
- Scales media attachement previews to a max size (if Emacs is built with imagemagick)
- Enable cacheing of image fetches

Known issues:
- We should really cache the avatars to avoid having multiple identical images in memory.
---
 lisp/mastodon.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'lisp/mastodon.el')

diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index 947cc6a..0dd7f10 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -60,6 +60,16 @@ Use. e.g. \"%c\" for your locale's date and time format."
   :group 'mastodon
   :type 'string)
 
+(defcustom mastodon-avatar-height 30
+  "Height of the user avatar images (if shown)."
+  :group 'mastodon
+  :type 'integer)
+
+(defcustom mastodon-preview-max-height 250
+  "Max height of any media attachment preview to be shown."
+  :group 'mastodon
+  :type 'integer)
+
 (defvar mastodon-mode-map
   (make-sparse-keymap)
   "Keymap for `mastodon-mode'.")
-- 
cgit v1.2.3