Skip to content

Commit b262d59

Browse files
Jan Vincent LiwanagJan Vincent Liwanag
Jan Vincent Liwanag
authored and
Jan Vincent Liwanag
committed
Fix warnings in Basic example
1 parent 8cac405 commit b262d59

File tree

1 file changed

+9
-9
lines changed

1 file changed

+9
-9
lines changed

examples/basic/src/Basic.purs

Lines changed: 9 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -15,12 +15,12 @@ border :: forall r. { borderSize :: Size, borderColor :: String | r } -> E.Style
1515
border { borderSize, borderColor } =
1616
E.css
1717
{ borderWidth:
18-
E.int case borderSize of
18+
E.px case borderSize of
1919
S -> 1
2020
M -> 2
2121
L -> 4
2222
, borderColor: E.str borderColor
23-
, borderRadius: E.int 4
23+
, borderRadius: E.px 4
2424
, borderStyle: E.str "solid"
2525
, padding: E.str "16px 24px"
2626
}
@@ -30,15 +30,15 @@ text size =
3030
E.css
3131
{ fontFamily: E.str "sans-serif"
3232
, fontSize:
33-
E.int case size of
33+
E.px case size of
3434
S -> 14
3535
M -> 18
3636
L -> 32
3737
, fontWeight:
38-
E.int case size of
39-
S -> 400
40-
M -> 500
41-
L -> 800
38+
E.str case size of
39+
S -> "400"
40+
M -> "500"
41+
L -> "800"
4242
}
4343

4444
type SlatProps
@@ -93,8 +93,8 @@ mkEx = do
9393
, css =
9494
E.merge
9595
[ E.css
96-
{ padding: E.int 4
97-
, maxWidth: E.int 200
96+
{ padding: E.px 4
97+
, maxWidth: E.px 200
9898
}
9999
, text S
100100
]

0 commit comments

Comments
 (0)