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/Body.hs | 36 ------------------------------------ 1 file changed, 36 deletions(-) delete mode 100644 css/Body.hs (limited to 'css/Body.hs') diff --git a/css/Body.hs b/css/Body.hs deleted file mode 100644 index 0ff8df0..0000000 --- a/css/Body.hs +++ /dev/null @@ -1,36 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} - -module Body - ( style - ) where - -import Clay hiding (style) -import Prelude hiding ((**)) - -import qualified Color -import qualified Link -import qualified Media -import qualified Size - -style :: Css -style = do - - ".Body__Container" ** p ? do - Media.desktop $ marginRight (pct 20) - lineHeight (px 28) - - ".Body__Container" ** ul ? do - paddingLeft (px 0) - Media.desktop $ margin (px 20) (px 0) (px 20) (px 30) - Media.tablet $ margin (px 15) (px 0) (px 15) (px 20) - Media.mobile $ marginBottom Size.listItemSep - - ".Body__Container" ** li ? do - Size.lineHeight - before & do - content (stringContent "•") - color Color.red - display inlineBlock - marginRight (px 10) - - Link.style (".Body__Container" ** a) -- cgit v1.2.3