~alcinnz/haphaestus: Fix type error (CatTrap uses Doubles, Typograffiti Floats).

63ef2588c8f20be2bf87c4e80f92827348bc5cc7 — Adrian Cochrane 1 year, 10 months ago 87e7a20

Fix type error (CatTrap uses Doubles, Typograffiti Floats).

patch browse

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

M src/Main.hs

M src/Main.hs => src/Main.hs +1 -1

@@ 161,7 161,7 @@ main = do
             font <- liftIO $ instantiatePattern ft pat (-1, size)
             atlas <- allocAtlas (liftIO . bmpAndMetricsForIndex font SubpixelDefault)
                         (map toEnum $ IS.toList glyphs)
-                        (hbScale sysfont, hbScale sysfont)
+                        (realToFrac $ hbScale sysfont, realToFrac $ hbScale sysfont)
             return ((pat, size), atlas)
         let atlases' = M.fromList atlases