Make the return value of the palette include common overrides

Thanks to Christian Tietze for reporting a bug that helped me trace
this limitation: <https://lists.sr.ht/~protesilaos/modus-themes/%3Cm1cz81rq9m.fsf%40christiantietze.de%3E>.
This commit is contained in:
Protesilaos Stavrou 2022-12-30 15:26:16 +02:00
parent 9c9347683b
commit ae6cc7ed14
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA

View file

@ -1076,7 +1076,9 @@ symbol."
"Return palette value of THEME with optional OVERRIDES."
(let ((base-value (symbol-value (modus-themes--palette-symbol theme))))
(if overrides
(append (symbol-value (modus-themes--palette-symbol theme :overrides)) base-value)
(append (symbol-value (modus-themes--palette-symbol theme :overrides))
modus-themes-common-palette-overrides
base-value)
base-value)))
(defun modus-themes--current-theme-palette (&optional overrides)