Setting up Scotty, Persistent, Clay, Blaze, Esqueleto, Elm

2 files changed, 27 insertions, 0 deletions

diff --git a/src/server/Design/Color.hs b/src/server/Design/Color.hs
new file mode 100644
index 0000000..bc7fca0
--- /dev/null
+++ b/src/server/Design/Color.hs
@@ -0,0 +1,6 @@
+module Design.Color where
+
+import qualified Clay.Color as C
+
+brown :: C.Color
+brown = C.brown
diff --git a/src/server/Design/Global.hs b/src/server/Design/Global.hs
new file mode 100644
index 0000000..cc16e2e
--- /dev/null
+++ b/src/server/Design/Global.hs
@@ -0,0 +1,21 @@
+module Design.Global
+  ( globalDesign
+  ) where
+
+import Clay
+
+import Data.Text.Lazy (Text)
+
+import Design.Color as C
+
+globalDesign :: Text
+globalDesign = renderWith compact [] global
+
+global :: Css
+global =
+  header ?
+    h1 ? do
+      fontSize (px 40)
+      textAlign (alignSide sideCenter)
+      margin (px 30) (px 0) (px 30) (px 0)
+      color C.brown