[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master bdc222b: Tweak how much <sup>/<sub> raises/lowers t
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master bdc222b: Tweak how much <sup>/<sub> raises/lowers text in shr |
Date: |
Mon, 23 Sep 2019 10:05:23 -0400 (EDT) |
branch: master
commit bdc222b26843cfc49bc1b73369acf27fed3aa133
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Tweak how much <sup>/<sub> raises/lowers text in shr
* lisp/net/shr.el (shr-tag-sup, shr-tag-sub): Raising by 0.5 gives
very ugly displays. 0.2 seems sufficient for legibility.
---
lisp/net/shr.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index cd5aa39..2e4f7fa 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1376,12 +1376,12 @@ ones, in case fg and bg are nil."
(defun shr-tag-sup (dom)
(let ((start (point)))
(shr-generic dom)
- (put-text-property start (point) 'display '(raise 0.5))))
+ (put-text-property start (point) 'display '(raise 0.2))))
(defun shr-tag-sub (dom)
(let ((start (point)))
(shr-generic dom)
- (put-text-property start (point) 'display '(raise -0.5))))
+ (put-text-property start (point) 'display '(raise -0.2))))
(defun shr-tag-p (dom)
(shr-ensure-paragraph)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master bdc222b: Tweak how much <sup>/<sub> raises/lowers text in shr,
Lars Ingebrigtsen <=