Subject: Re: bug#59122: 29.0.50; global-text-scale-adjust not working

From: Stefan Kangas <[email-masked]>
Date: Wed, 9 Nov 2022 15:43:05 +0100

Robert Pluim <[email-masked]> writes:

> >>>>> On Wed, 9 Nov 2022 15:30:15 +0100, Stefan Kangas <[email-masked]> said:
>     Stefan> With
>
>     Stefan> (set-face-attribute 'default nil :height (- (face-attribute 'default
>     Stefan> :height) 6))
>
>     Stefan> the font size is decreased.  If I evaluate it more than once, the font
>     Stefan> size decreases more with each additional invocation.
>
> But it actually decreases by 10, right? (and similarly for increases)

It would seem so:

(cons (face-attribute 'default :height)
      (progn
    (set-face-attribute 'default nil
                :height (- (face-attribute 'default :height) 6))
    (face-attribute 'default :height)))
=> (120 . 110)

With 'global-text-scale-adjust', in a fresh emacs -Q, I see that:

(cons (face-attribute 'default :height)
      (progn
    (global-text-scale-adjust 1)
    (face-attribute 'default :height)))
=> (120 . 130)