From caec1240b7e1dea5cf40ee44babd6a682ec1cbec Mon Sep 17 00:00:00 2001
From: Adrian Cochrane <adrian@openwork.nz>
Date: Wed, 15 Mar 2023 18:36:42 +1300
Subject: [PATCH] Correct mistyped variable reference.

---
 src/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index c3f5e28..93aee31 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -192,7 +192,7 @@ main = do
             let outerbox = zeroBox { B.min = size, B.size = size, B.max = size }
             let layout = boxLayout outerbox (finalizeCSS' sysfont style) False
 
-            renderLayout atlases drawText layout
+            renderLayout atlases drawGlyphs layout
 
             liftIO $ glSwapWindow w
             unless (QuitEvent `elem` events) loop
-- 
2.30.2