blob: 1fc097b398fef50a5795c967800ad8d07fd7cb31 (
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
|
module Size
( lineHeight
, listItemSep
, tabletMarginBottom
) where
import Clay hiding (lineHeight)
import qualified Clay
import qualified Media
lineHeight :: Css
lineHeight = do
Media.desktop $ Clay.lineHeight (px 40)
Media.tablet $ Clay.lineHeight (px 35)
Media.mobile $ Clay.lineHeight (px 30)
listItemSep :: Size LengthUnit
listItemSep =
px 8
tabletMarginBottom :: Css
tabletMarginBottom =
Media.tablet $ marginBottom (px 15)
|
