From df0341b167ba2de92dd26ef9e687026db33f524e Mon Sep 17 00:00:00 2001 From: alexjgriffith Date: Fri, 5 May 2017 12:04:12 -0400 Subject: #114 Swapped customize-set-value to let --- lisp/mastodon-tl.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 3a41143..c109df5 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -160,8 +160,7 @@ also render the html" (with-temp-buffer (insert (decode-coding-string string 'utf-8)) (when render - (progn - (customize-set-value 'shr-use-fonts nil) + (let ((shr-use-fonts nil)) (shr-render-region (point-min) (point-max)))) (buffer-string)) 'face face)) @@ -195,8 +194,8 @@ 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)) + (let ((shr-use-fonts nil)) + (shr-render-region (point-min) (point-max))) (buffer-string)) 'face 'default))) -- cgit v1.2.3