1module Icons exposing (..)
2
3import Chunky exposing (slaby)
4import Html
5import Material.Icons.Types exposing (Coloring)
6import VirtualDom
7
8
9
10-- 🌳
11
12
13type alias Icon msg =
14 Int -> Coloring -> VirtualDom.Node msg
15
16
17
18-- 🔱
19
20
21wrapped : List String -> Icon msg -> Int -> Coloring -> VirtualDom.Node msg
22wrapped classes icon size coloring =
23 coloring
24 |> icon size
25 |> slaby Html.span [] classes