From 89f52d0fcbcd1775af8a43e09e1de2c78b51c007 Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Sat, 16 Jan 2021 11:38:07 -0500
Subject: Style SelectRepo page and all links

I'm borrowing heavily from Basecamp.com, but I figure after enough itreation I
will settle on something more unique. Anyway, copying Basecamp isn't so bad --
they are a great company after all!
---
 Biz/Look.hs | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'Biz/Look.hs')

diff --git a/Biz/Look.hs b/Biz/Look.hs
index c2ef55e..e7bcb82 100644
--- a/Biz/Look.hs
+++ b/Biz/Look.hs
@@ -15,6 +15,9 @@ module Biz.Look
     noColorPreference,
     -- | Font
     fontStack,
+    -- | Clay.Text extensions
+    textDecorationThickness,
+    textDecorationWidth,
     -- | Elements
     hoverButton,
   )
@@ -97,3 +100,9 @@ fuckingStyle = do
       background ("#444" :: Color)
     "a:link" ? color ("#5bf" :: Color)
     "a:visited" ? color ("#ccf" :: Color)
+
+textDecorationThickness :: Size LengthUnit -> Css
+textDecorationThickness = Clay.key "text-decoration-thickness"
+
+textDecorationWidth :: Size LengthUnit -> Css
+textDecorationWidth = Clay.key "text-decoration-width"
-- 
cgit v1.2.3