From 26ef30f499733b2bd9450b0398ef8bbeac56d5ef Mon Sep 17 00:00:00 2001
From: Adrian Cochrane <adrian@openwork.nz>
Date: Wed, 15 Mar 2023 18:41:15 +1300
Subject: [PATCH] Passed wrong mapping type to recursive renderer.

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

diff --git a/src/Main.hs b/src/Main.hs
index 70ffc0a..159be45 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 drawGlyphs layout
+            renderLayout atlases' drawGlyphs layout
 
             liftIO $ glSwapWindow w
             unless (QuitEvent `elem` events) loop
-- 
2.30.2