diff options
author | Alexander Griffith <griffitaj@gmail.com> | 2017-05-02 22:46:06 -0400 |
---|---|---|
committer | Johnson Denen <johnson.denen@gmail.com> | 2017-05-05 13:01:59 -0400 |
commit | a3aabb8356da11e5ae56215cd4e704b1f8397175 (patch) | |
tree | e8e23db056a761eda823806f0ce26e9d2f7b1d33 /lisp | |
parent | bfbeaccb0ad949beb2d0e40d77f9aaa39ef0b4e3 (diff) |
removed fonting from shr-render-region call
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mastodon-tl.el | 5 |
1 files changed, 4 insertions, 1 deletions
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))) |