From 60b4a0fafebfc0351b3d0a6be13474d0f76e284a Mon Sep 17 00:00:00 2001 From: Akshay Nair Date: Sun, 15 Dec 2024 18:13:03 +0530 Subject: UI changes for grid --- src/Chelleport/Draw.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Chelleport/Draw.hs') diff --git a/src/Chelleport/Draw.hs b/src/Chelleport/Draw.hs index 530713a..9ace9da 100644 --- a/src/Chelleport/Draw.hs +++ b/src/Chelleport/Draw.hs @@ -26,14 +26,14 @@ colorGridLines :: SDL.V4 Word8 colorGridLines = SDL.V4 127 29 29 150 colorAxisLines :: SDL.V4 Word8 -colorAxisLines = SDL.V4 239 68 68 255 +colorAxisLines = colorAccent colorBackground :: SDL.V4 Word8 colorBackground = SDL.V4 15 12 25 0 drawText :: DrawContext -> SDL.V2 CInt -> SDL.V4 Word8 -> Text -> IO (CInt, CInt) drawText ctx@(DrawContext {ctxRenderer = renderer}) position color text = do - surface <- TTF.solid (ctxFont ctx) color text -- TTF.blended + surface <- TTF.blended (ctxFont ctx) color text texture <- SDL.createTextureFromSurface renderer surface SDL.freeSurface surface -- cgit v1.3.1