From a3aabb8356da11e5ae56215cd4e704b1f8397175 Mon Sep 17 00:00:00 2001 From: Alexander Griffith Date: Tue, 2 May 2017 22:46:06 -0400 Subject: removed fonting from shr-render-region call --- lisp/mastodon-tl.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lisp/mastodon-tl.el') diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index bfb185a..3a41143 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -160,7 +160,9 @@ also render the html" (with-temp-buffer (insert (decode-coding-string string 'utf-8)) (when render - (shr-render-region (point-min) (point-max))) + (progn + (customize-set-value 'shr-use-fonts nil) + (shr-render-region (point-min) (point-max)))) (buffer-string)) 'face face)) @@ -193,6 +195,7 @@ also render the html" (let ((content (mastodon-tl--field 'content toot))) (propertize (with-temp-buffer (insert (decode-coding-string content 'utf-8)) + (customize-set-value 'shr-use-fonts nil) (shr-render-region (point-min) (point-max)) (buffer-string)) 'face 'default))) -- cgit v1.2.3