W.Badge

Badges are commonly used to display notifications.

List (Attribute msg)

-> { content : Maybe (List (Html msg))

, children : List (Html msg)

}

-> Html msg

W.Badge.view []
    { -- number of unread messages
      content = Just [ H.text "9" ]
    , -- call to action
      children =
        [ W.Button.viewLink []
            { href = "/messages"
            , label = [ H.text "Messages" ]
            }
        ]
    }

viewInline : List (Attribute msg) -> List (Html msg) -> Html msg