From 4140eba65f28f1117ebb14d8e9252770c951c0bd Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 20 Sep 2022 06:14:40 +0100 Subject: fix for -f-with_xrender build --- src/Xmobar/Draw/Cairo.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Xmobar/Draw/Cairo.hs b/src/Xmobar/Draw/Cairo.hs index 8fa4c46..a25cca0 100644 --- a/src/Xmobar/Draw/Cairo.hs +++ b/src/Xmobar/Draw/Cairo.hs @@ -159,9 +159,9 @@ drawBoxes dctx surf [bi] = drawBBox dctx surf bi drawBoxes _ _ [] = return () #ifndef XRENDER -drawCairoBackground :: DrawContext -> Surface -> IO () +drawCairoBackground :: T.DrawContext -> Surface -> IO () drawCairoBackground dctx surf = do - let (c, _) = readColourName (C.bgColor (dcConfig dctx)) + let (c, _) = readColourName (C.bgColor (T.dcConfig dctx)) Cairo.renderWith surf $ setSourceColor (c, 1.0) >> Cairo.paint #endif -- cgit v1.2.3