Various fixes

1 files changed, 1 insertions, 12 deletions

diff --git a/server/src/Design/Helper.hs b/server/src/Design/Helper.hs
index 6980c71..e586d56 100644
--- a/server/src/Design/Helper.hs
+++ b/server/src/Design/Helper.hs
@@ -1,16 +1,14 @@
 module Design.Helper
   ( clearFix
   , button
-  , input
   , centeredWithMargin
   , verticalCentering
   ) where
 
 import           Prelude          hiding (span)
 
-import           Clay             hiding (button, input)
+import           Clay             hiding (button)
 
-import           Design.Color     as Color
 import           Design.Constants
 
 clearFix :: Css
@@ -37,15 +35,6 @@ button backgroundCol textCol h focusOp = do
   hover & backgroundColor (focusOp backgroundCol)
   focus & backgroundColor (focusOp backgroundCol)
 
-input :: Double -> Css
-input h = do
-  height (px h)
-  padding (px 10) (px 10) (px 10) (px 10)
-  borderRadius radius radius radius radius
-  border solid (px 1) Color.dustyGray
-  focus & borderColor Color.silver
-  verticalAlign middle
-
 centeredWithMargin :: Css
 centeredWithMargin = do
   width (pct blockPercentWidth)