From f76aaedd794f15d9f049f53a081710b9565fb8b1 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 1 Nov 2015 12:24:51 +0100
Subject: Add an opacity animation at signIn and loggedIn overture

---
 src/server/Design/Animation/Keyframes.hs | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 src/server/Design/Animation/Keyframes.hs

(limited to 'src/server/Design/Animation/Keyframes.hs')

diff --git a/src/server/Design/Animation/Keyframes.hs b/src/server/Design/Animation/Keyframes.hs
new file mode 100644
index 0000000..3ea5575
--- /dev/null
+++ b/src/server/Design/Animation/Keyframes.hs
@@ -0,0 +1,26 @@
+{-# 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
+      )
+    ]
-- 
cgit v1.2.3