diff options
Diffstat (limited to 'Hero/Look/Typography.hs')
-rw-r--r-- | Hero/Look/Typography.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Hero/Look/Typography.hs b/Hero/Look/Typography.hs index d51cdbc..9e35ef5 100644 --- a/Hero/Look/Typography.hs +++ b/Hero/Look/Typography.hs @@ -52,7 +52,7 @@ fontRoot = Pack.cdnEdge <> "/old-assets/fonts/eurostile/Eurostile" -- | font faces fonts :: Css fonts = - mconcat $ + mconcat <| mkEuro </ [ ("-Reg.otf", OpenType, fontWeight normal <> fontStyle normal), ("LTStd-Bold.otf", OpenType, thicc <> norm), @@ -63,9 +63,9 @@ fonts = ] where mkEuro :: (Text, FontFaceFormat, Css) -> Css - mkEuro (sufx, fmt, extra) = fontFace $ do + mkEuro (sufx, fmt, extra) = fontFace <| do fontFamily ["Eurostile"] [] - fontFaceSrc [FontFaceSrcUrl (fontRoot <> sufx) $ Just fmt] + fontFaceSrc [FontFaceSrcUrl (fontRoot <> sufx) <| Just fmt] extra -- TODO: add the below to Clay.Font upstream |