2016-03-17 21:30:49 +00:00
|
|
|
module Demo.Badges where
|
|
|
|
|
|
|
|
import Html exposing (..)
|
2016-03-23 09:34:40 +00:00
|
|
|
import Html.Attributes exposing (class, style, key)
|
|
|
|
import Material.Badge as Badge
|
|
|
|
import Material.Style exposing (..)
|
2016-03-17 21:30:49 +00:00
|
|
|
|
2016-03-23 09:34:40 +00:00
|
|
|
-- VIEW
|
2016-03-17 21:30:49 +00:00
|
|
|
|
|
|
|
view : List Html
|
2016-03-23 09:34:40 +00:00
|
|
|
view = [ div [][p [][]
|
2016-03-24 08:29:47 +00:00
|
|
|
, styled span [Badge.withBadge "2"] [ ] [ text "Span with badge" ]
|
|
|
|
, p [][]
|
|
|
|
, styled span [Badge.withBadge "22", Badge.noBackground] [ ] [ text "Span with no background badge" ]
|
|
|
|
, p [][]
|
|
|
|
, styled span [Badge.withBadge "33", Badge.overlap] [ ] [ text "Span with badge overlap" ]
|
|
|
|
, p [][]
|
|
|
|
, styled span [Badge.withBadge "99", Badge.overlap, Badge.noBackground] [ ] [ text "Span with badge overlap and no background" ]
|
2016-03-23 09:34:40 +00:00
|
|
|
, p [][]
|
2016-03-24 09:01:29 +00:00
|
|
|
, styled span [Badge.withBadge "♥"] [ ] [ text "Span with HTML symbol - Black heart suit" ]
|
|
|
|
, p [][]
|
|
|
|
, styled span [Badge.withBadge "→"] [ ] [ text "Span with HTML symbol - Rightwards arrow" ]
|
|
|
|
, p [][]
|
|
|
|
, styled span [Badge.withBadge "Δ"] [ ] [ text "Span with HTML symbol - Delta" ]
|
|
|
|
, p [][]
|
2016-03-23 09:34:40 +00:00
|
|
|
]
|
|
|
|
]
|