branch: externals/olivetti
commit 4344261cf8e02d1ab1091f212ba5e370c3a7ba0a
Author: Paul Rankin <[email protected]>
Commit: Paul Rankin <[email protected]>
Don't round olivetti-scale-width
---
olivetti.el | 9 ++++-----
1 file changed, 4 insertions(+), 5 deletions(-)
diff --git a/olivetti.el b/olivetti.el
index baf08a1..c5a9035 100644
--- a/olivetti.el
+++ b/olivetti.el
@@ -270,11 +270,10 @@ Toggles the value of `olivetti-hide-mode-line' and runs
For compatibility with `text-scale-mode', if
`face-remapping-alist' includes a :height property on the default
face, scale N by that factor, otherwise scale by 1."
- (let ((face-height (or (plist-get (cadr (assq 'default
- face-remapping-alist))
- :height)
- 1)))
- (round (* n face-height))))
+ (* n (or (plist-get (cadr (assq 'default
+ face-remapping-alist))
+ :height)
+ 1)))
(defun olivetti-safe-width (width window)
"Parse WIDTH to a safe value for `olivetti-body-width' for WINDOW."
