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/Link.hs | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 css/Link.hs (limited to 'css/Link.hs') diff --git a/css/Link.hs b/css/Link.hs new file mode 100644 index 0000000..ba3b090 --- /dev/null +++ b/css/Link.hs @@ -0,0 +1,23 @@ +{-# LANGUAGE OverloadedStrings #-} + +module Link + ( style + ) where + +import Clay hiding (style) +import Clay.Selector (Fix, SelectorF (SelectorF)) + +import qualified Color + +style :: (Fix SelectorF) -> Css +style selector = do + + selector ? do + textDecoration none + color Color.link + transition "color" (sec 0.3) easeOut (sec 0) + focus & outline solid (px 0) Color.white + + (selector # hover) <> (selector # focus) ? do + textDecoration underline + color Color.blue -- cgit v1.2.3