aboutsummaryrefslogtreecommitdiff
path: root/src/Styles.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/Styles.elm')
-rw-r--r--src/Styles.elm67
1 files changed, 67 insertions, 0 deletions
diff --git a/src/Styles.elm b/src/Styles.elm
new file mode 100644
index 0000000..57c124b
--- /dev/null
+++ b/src/Styles.elm
@@ -0,0 +1,67 @@
1module Styles exposing (..)
2
3import Css exposing (..)
4import Css.Global exposing (global, selector)
5import Html
6import Html.Styled exposing (..)
7
8
9styledButton : List (Attribute msg) -> List (Html msg) -> Html msg
10styledButton =
11 styled
12 button
13 [ margin (px 12)
14 , color (hex "#000")
15 , fontFamily monospace
16 , backgroundColor (hex "#ddd")
17 , border (px 0)
18 , borderRadius (px 4)
19 , padding (px 12)
20 ]
21
22
23styledInput : List (Attribute msg) -> List (Html msg) -> Html msg
24styledInput =
25 styled
26 input
27 [ margin (px 12)
28 , color (hex "#000")
29 , fontFamily monospace
30 , backgroundColor (hex "#eee")
31 , border (px 0)
32 , borderRadius (px 4)
33 , padding (px 12)
34 ]
35
36
37styledListItem : List (Attribute msg) -> List (Html msg) -> Html msg
38styledListItem =
39 styled
40 li
41 [ display inline
42 ]
43
44
45styledUnorderedList : List (Attribute msg) -> List (Html msg) -> Html msg
46styledUnorderedList =
47 styled
48 ul
49 [ listStyle Css.none
50 , padding (px 0)
51 ]
52
53
54styledTextBox : List (Attribute msg) -> List (Html msg) -> Html msg
55styledTextBox =
56 styled
57 div
58 [ margin (px 12)
59 , color (hex "#000")
60 , fontFamily monospace
61 , backgroundColor (hex "#eee")
62 , border (px 0)
63 , borderRadius (px 4)
64 , padding (px 12)
65 , width (px 500)
66 , display inlineBlock
67 ]