blob: 9f435ebb28695b9f46425de96492911146713a17 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
module Design.Errors
( design
) where
import Clay
import Design.Color as Color
design :: Css
design = do
position fixed
top (px 20)
left (pct 50)
"transform" -: "translateX(-50%)"
margin (px 0) (px 0) (px 0) (px 0)
disapearKeyframes
".error" ? do
disapearAnimation
let errorColor = Color.chestnutRose -. 15
color errorColor
border solid (px 2) errorColor
backgroundColor Color.white
borderRadius (px 5) (px 5) (px 5) (px 5)
padding (px 5) (px 5) (px 5) (px 5)
before & display none
disapearAnimation :: Css
disapearAnimation = do
animationName "disapear"
animationDelay (sec 5)
animationDuration (sec 1)
animationFillMode forwards
disapearKeyframes :: Css
disapearKeyframes = keyframes
"disapear"
[ ( 10
, do
opacity 0
height (px 40)
lineHeight (px 40)
marginBottom (px 10)
)
, ( 100
, do
opacity 0
height (px 0)
lineHeight (px 0)
marginBottom (px 0)
)
]
|
