diff options
author | Ben Sima <ben@bsima.me> | 2020-04-15 09:54:10 -0700 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2020-04-15 10:06:56 -0700 |
commit | f4b8c0df041b063c0b47d2ec6c818a9c202fd833 (patch) | |
tree | 01ad246a83fda29c079847b3397ca6509a7f6106 /Com/InfluencedByBooks/Look.hs | |
parent | 6ed475ca94209ce92e75f48764cb9d361029ea26 (diff) |
Re-namespacing
Moving away from the DNS-driven namespacing toward more condensed names,
mostly because I don't like typing so much.
Diffstat (limited to 'Com/InfluencedByBooks/Look.hs')
-rw-r--r-- | Com/InfluencedByBooks/Look.hs | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/Com/InfluencedByBooks/Look.hs b/Com/InfluencedByBooks/Look.hs deleted file mode 100644 index d904d3a..0000000 --- a/Com/InfluencedByBooks/Look.hs +++ /dev/null @@ -1,40 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE NoImplicitPrelude #-} - --- | The look and feel of Ibb -module Com.InfluencedByBooks.Look where - -import Alpha hiding ( Selector ) -import Clay -import qualified Clay.Flexbox as Flexbox -import qualified Clay.Media as Media -import qualified Clay.Render as Clay -import qualified Clay.Stylesheet as Stylesheet - -main :: Css -main = do - "html" <> "body" ? do - width (pct 100) - display flex - flexDirection column - alignItems center - alignContent center - justifyContent center - ".container" ? do - maxWidth (px 900) - display flex - justifyContent center - flexDirection column - fontFamily ["GillSans", "Calibri", "Trebuchet"] [sansSerif] - headings ? do - fontFamily - [ "Palatino" - , "Palatino Linotype" - , "Hoefler Text" - , "Times New Roman" - , "Times" - ] - [serif] - -headings :: Selector -headings = h1 <> h2 <> h3 <> h4 <> h5 <> h6 |