Tweak "dim" foregrounds

(pcase-dolist (`(,sym ,color)
               eighters-palette)
  (when (string-match-p "\\`fg-[a-z]*\\'" (symbol-name sym))
    (when-let* ((sym-dim (intern (concat
                                  (symbol-name sym)
                                  "-dim")))
                (dim-cdr (alist-get sym-dim eighters-palette))
                (new-color (eighters-hsl-to-hex
                            (car (apply 'color-rgb-to-hsl
                                        (color-name-to-rgb color)))
                            0.4 0.66)))
      (message "%s → %s" sym-dim new-color)
      (setcar dim-cdr new-color))))

Followup changes:

* make strings the same color as constants (though dimmer) to make
types stand out more;

(Unfortunate side-effect: constants within strings stand out less.
Hm)

* only use variable-pitch for Gnus header names; keep empty
gnus-header because its docstring says all gnus-header faces must
inherit from it 🫡

* ARGH YES OH RIGHT HAD FORGOTTEN ABOUT MM-UU-EXTRACT UGH MY EYES

0 files changed, 0 insertions, 0 deletions