From 23f04635cc26e1b0553088f28553f518488a9fc8 Mon Sep 17 00:00:00 2001 From: Joris Date: Wed, 1 May 2019 15:52:32 +0200 Subject: Setup personal page with Hakyll --- css/Style.hs | 58 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 58 insertions(+) create mode 100644 css/Style.hs (limited to 'css/Style.hs') diff --git a/css/Style.hs b/css/Style.hs new file mode 100644 index 0000000..f53ca1e --- /dev/null +++ b/css/Style.hs @@ -0,0 +1,58 @@ +{-# LANGUAGE OverloadedStrings #-} + +import Clay +import qualified Data.Text.Lazy.IO as T + +import qualified Body +import qualified Color +import qualified Header +import qualified IconLink +import qualified Media +import qualified Project +import qualified Resume +import qualified Section +import qualified Skills + +main :: IO () +main = T.putStrLn . renderWith compact [] $ do + + appearKeyframes + + body ? do + overflowX hidden + color Color.black + margin (px 0) (px 0) (px 40) (px 0) + Media.mobile $ fontSize (px 16) + Media.tabletDesktop $ fontSize (px 18) + + ".Main__Container" ? do + animationName "appear" + animationDuration (sec 0.2) + animationTimingFunction easeIn + animationIterationCount (iterationCount 1.0) + + svg ? do + width inherit + height inherit + + ul ? do + listStyleType none + paddingLeft (px 0) + + Body.style + Header.style + IconLink.style + Project.style + Resume.style + Section.style + Skills.style + +appearKeyframes :: Css +appearKeyframes = keyframes + "appear" + [ (0, do + "transform" -: "translateX(10px)" + opacity 0 + ) + , (100, "transform" -: "translateX(0px)") + ] -- cgit v1.2.3