From 0e365a00587b961b83de54206a5dc058adadfddf Mon Sep 17 00:00:00 2001 From: Steven Allen Date: Tue, 23 Jan 2024 15:15:44 -0800 Subject: [PATCH] Use color-values instead of x-color-values * exwm-core.el (exwm--color->pixel): Use `color-values` (introduced in Emacs 21) instead of `x-color-values` (deprecated in Emacs 30). --- exwm-core.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/exwm-core.el b/exwm-core.el index d159592..e0d644d 100644 --- a/exwm-core.el +++ b/exwm-core.el @@ -206,7 +206,7 @@ If FRAME is null, use selected frame." "Convert COLOR to PIXEL (index in TrueColor colormap)." (when (and color (eq (x-display-visual-class) 'true-color)) - (let ((rgb (x-color-values color))) + (let ((rgb (color-values color))) (logior (ash (ash (pop rgb) -8) 16) (ash (ash (pop rgb) -8) 8) (ash (pop rgb) -8)))))