From 1e167679f6827c7119d616633b21fffef269cd75 Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 31 Oct 2020 15:24:26 +0100 Subject: Use only HTML and CSS --- css/Link.hs | 23 ----------------------- 1 file changed, 23 deletions(-) delete mode 100644 css/Link.hs (limited to 'css/Link.hs') diff --git a/css/Link.hs b/css/Link.hs deleted file mode 100644 index ba3b090..0000000 --- a/css/Link.hs +++ /dev/null @@ -1,23 +0,0 @@ -{-# 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