blob: c42e9f329aa65438c6f175da272f8878871d0f52 (
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
|
{-# LANGUAGE OverloadedStrings #-}
module Design.LoggedIn.Pages
( pagesDesign
) where
import Clay
import Design.Color as C
import Design.Helper
import Design.Constants
pagesDesign :: Css
pagesDesign =
".pages" ? do
padding (px 30) (px 30) (px 30) (px 30)
textAlign (alignSide (sideCenter))
clearFix
".page" ? do
display inlineBlock
border solid (px 2) C.darkGrey
color C.darkGrey
borderRadius radius radius radius radius
marginRight (px 10)
let h = 50
paddingLeft (px 10)
paddingRight (px 10)
height (px h)
lineHeight (px h)
textAlign (alignSide (sideCenter))
fontWeight bold
":not(.current)" & cursor pointer
".current" & do
borderColor C.red
color C.red
|
