aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormousebot <mousebot@riseup.net>2021-05-16 10:21:56 +0200
committermousebot <mousebot@riseup.net>2021-05-16 13:18:19 +0200
commit508e3faeceb03ad14bb350d0da56552edf33ccc2 (patch)
treee4a0f779a2c26a5d5f3d8a23a9f184930959ca31 /lisp
parente5a8ca254300e20932786a1ecb4ceb3387ab84e5 (diff)
shrink width of shr-width in -tl--render-text.
setting this to window-width minus 1 makes text flow work properly for me with proportional fonts enabled.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-tl.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index de64e1b..7624088 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -397,7 +397,7 @@ links in the text. If TOOT is nil no parsing occurs."
(insert string)
(let ((shr-use-fonts mastodon-tl--enable-proportional-fonts)
(shr-width (when mastodon-tl--enable-proportional-fonts
- (window-width))))
+ (- (window-width) 1))))
(shr-render-region (point-min) (point-max)))
;; Make all links a tab stop recognized by our own logic, make things point
;; to our own logic (e.g. hashtags), and update keymaps where needed: