1 files changed, 2 insertions(+), 2 deletions(-)

M src/Main.hs

@@ 31,7 31,7 @@ import           Graphics.Layout.CSS (CSSBox(..), finalizeCSS')
 import           Graphics.Layout.CSS.Internal (placeholderFont, Font'(..),
                                                 pattern2font, hbScale, CSSFont(..))
 import           Graphics.Layout.Box as B (zeroBox, PaddedBox(..), Size(..))
-import           Graphics.Layout (boxLayout, glyphsPerFont, LayoutItem(..))
+import           Graphics.Layout (boxLayout, glyphsPerFont, LayoutItem(..), layoutGetChilds)
 import           Graphics.Text.Font.Choose (nameParse)
 
 import           FreeType.FontConfig (instantiatePattern, bmpAndMetricsForIndex,


@@ 189,7 189,7 @@ main = do
             let outerbox = zeroBox { B.min = size, B.size = size, B.max = size }
             let layout = boxLayout outerbox (finalizeCSS' sysfont style) False
 
-            renderLayout layout
+            renderLayout drawText layout
 
             liftIO $ glSwapWindow w
             unless (QuitEvent `elem` events) loop