From f4b8c0df041b063c0b47d2ec6c818a9c202fd833 Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Wed, 15 Apr 2020 09:54:10 -0700
Subject: Re-namespacing

Moving away from the DNS-driven namespacing toward more condensed names,
mostly because I don't like typing so much.
---
 Com/InfluencedByBooks/Look.hs | 40 ----------------------------------------
 1 file changed, 40 deletions(-)
 delete mode 100644 Com/InfluencedByBooks/Look.hs

(limited to 'Com/InfluencedByBooks/Look.hs')

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
-- 
cgit v1.2.3