From adecca2551144451e789b9ed7fca49aee5c2e770 Mon Sep 17 00:00:00 2001
From: Adrian Cochrane <adrian@openwork.nz>
Date: Tue, 14 Mar 2023 16:54:42 +1300
Subject: [PATCH] Draft integration of CatTrap.

---
 src/Main.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index 89c8ee7..ee7c44a 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -28,10 +28,12 @@ import           Stylist (cssPriorityAgent, cssPriorityUser, attrTest, elementPa
 import           Stylist.Tree (treeFind)
 import           Data.HTML2CSS (el2stylist)
 
+import           Graphics.Layout.CSS (CSSBox(..), finalizeCSS)
+
 import Data.Maybe (fromMaybe)
 import System.Environment (getArgs)
 
-type Style = Style.VarParser (CSSTxt.TextStyle VizStyle)
+type Style = Style.VarParser (CSSBox (CSSTxt.TextStyle VizStyle))
 data VizStyle = VizStyle
 instance Style.PropertyParser VizStyle where
     temp = VizStyle
-- 
2.30.2