From cfade71c343eb29c8873011f5878a39aed8257b2 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 26 Jun 2016 15:19:03 +0200 Subject: Cleanup --- src/server/Design/Animation/Keyframes.hs | 26 -------------------------- src/server/Design/Global.hs | 4 ---- 2 files changed, 30 deletions(-) delete mode 100644 src/server/Design/Animation/Keyframes.hs (limited to 'src/server') diff --git a/src/server/Design/Animation/Keyframes.hs b/src/server/Design/Animation/Keyframes.hs deleted file mode 100644 index 3ea5575..0000000 --- a/src/server/Design/Animation/Keyframes.hs +++ /dev/null @@ -1,26 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} - -module Design.Animation.Keyframes - ( Keyframes(..) - , allKeyframes - ) where - -import Data.String (fromString) - -import Clay - -data Keyframes = - OpacityKeyframes - deriving (Eq, Show) - -allKeyframes :: Css -allKeyframes = - keyframes - (fromString . show $ OpacityKeyframes) - [ ( 0 - , opacity 0 - ) - , ( 100 - , opacity 1 - ) - ] diff --git a/src/server/Design/Global.hs b/src/server/Design/Global.hs index 149769c..68d0196 100644 --- a/src/server/Design/Global.hs +++ b/src/server/Design/Global.hs @@ -14,8 +14,6 @@ import qualified Design.LoggedIn as LoggedIn import qualified Design.Form as Form import qualified Design.Dialog as Dialog -import Design.Animation.Keyframes - import Design.Color as Color import Design.Helper as Helper import Design.Constants as Constants @@ -32,8 +30,6 @@ global = do ".dialog" ? Dialog.design Form.design - allKeyframes - body ? do minWidth (px 320) fontFamily ["Cantarell"] [sansSerif] -- cgit v1.2.3