diff --git a/elm-package.json b/elm-package.json index 96858eb..b82b0e4 100644 --- a/elm-package.json +++ b/elm-package.json @@ -11,9 +11,8 @@ "Bootstrap.Html.Internal" ], "dependencies": { - "circuithub/elm-html-shorthand": "11.0.0 <= v < 12.0.0", - "elm-lang/core": "4.0.0 <= v < 5.0.0", - "elm-lang/html": "1.0.0 <= v < 2.0.0" + "elm-lang/core": "5.0.0 <= v < 6.0.0", + "elm-lang/html": "2.0.0 <= v < 3.0.0" }, - "elm-version": "0.17.0 <= v < 0.18.0" -} \ No newline at end of file + "elm-version": "0.18.0 <= v < 0.19.0" +} diff --git a/src/Bootstrap/Html.elm b/src/Bootstrap/Html.elm index f83d25d..d204669 100644 --- a/src/Bootstrap/Html.elm +++ b/src/Bootstrap/Html.elm @@ -321,80 +321,126 @@ import Maybe import List exposing ((::)) import Bootstrap.Html.Internal as Internal + -- CSS -- Overview -{-| container_ -} + + +{-| container_ +-} container_ : List (Html msg) -> Html msg -container_ = div' {class = "container"} -{-| containerFluid_ -} +container_ = + div_ { class = "container" } + + +{-| containerFluid_ +-} containerFluid_ : List (Html msg) -> Html msg -containerFluid_ = div' {class = "container-fluid"} +containerFluid_ = + div_ { class = "container-fluid" } + + -- Grid system -{-| row_ -} + + +{-| row_ +-} row_ : List (Html msg) -> Html msg -row_ = div' {class = "row"} -{-| colXs_ -} +row_ = + div_ { class = "row" } + + +{-| colXs_ +-} colXs_ : Int -> List (Html msg) -> Html msg -colXs_ xs = div' {class = "col-xs-" ++ toString xs} -{-| colSm_ -} +colXs_ xs = + div_ { class = "col-xs-" ++ toString xs } + + +{-| colSm_ +-} colSm_ : Int -> Int -> List (Html msg) -> Html msg -colSm_ xs sm = div' {class = "col-xs-" ++ toString xs ++ " col-sm-" ++ toString sm} -{-| colMd_ -} +colSm_ xs sm = + div_ { class = "col-xs-" ++ toString xs ++ " col-sm-" ++ toString sm } + + +{-| colMd_ +-} colMd_ : Int -> Int -> Int -> List (Html msg) -> Html msg -colMd_ xs sm md = div' {class = "col-xs-" ++ toString xs ++ " col-sm-" ++ toString sm ++ " col-md-" ++ toString md} -{-| colLg_ -} +colMd_ xs sm md = + div_ { class = "col-xs-" ++ toString xs ++ " col-sm-" ++ toString sm ++ " col-md-" ++ toString md } + + +{-| colLg_ +-} colLg_ : Int -> Int -> Int -> Int -> List (Html msg) -> Html msg -colLg_ xs sm md lg = div' {class = "col-xs-" ++ toString xs ++ " col-sm-" ++ toString sm ++ " col-md-" ++ toString md ++ " col-lg-" ++ toString lg} +colLg_ xs sm md lg = + div_ { class = "col-xs-" ++ toString xs ++ " col-sm-" ++ toString sm ++ " col-md-" ++ toString md ++ " col-lg-" ++ toString lg } -{-| colXsOffset_ -} + +{-| colXsOffset_ +-} colXsOffset_ : Int -> Int -> List (Html msg) -> Html msg colXsOffset_ xs xsOffset = - div' - { class = Internal.colOffset "xs" xs xsOffset - } + div_ + { class = Internal.colOffset "xs" xs xsOffset + } + -{-| colSmOffset_ -} +{-| colSmOffset_ +-} colSmOffset_ : Int -> Int -> Int -> Int -> List (Html msg) -> Html msg colSmOffset_ xs xsOffset sm smOffset = - div' - { class = Internal.colOffset "xs" xs xsOffset - ++ ' ' `String.cons` Internal.colOffset "sm" sm smOffset - } + div_ + { class = + Internal.colOffset "xs" xs xsOffset + ++ String.cons ' ' (Internal.colOffset "sm" sm smOffset) + } -{-| colMdOffset_ -} + +{-| colMdOffset_ +-} colMdOffset_ : Int -> Int -> Int -> Int -> Int -> Int -> List (Html msg) -> Html msg colMdOffset_ xs xsOffset sm smOffset md mdOffset = - div' - { class = Internal.colOffset "xs" xs xsOffset - ++ ' ' `String.cons` Internal.colOffset "sm" sm smOffset - ++ ' ' `String.cons` Internal.colOffset "md" md mdOffset - } + div_ + { class = + Internal.colOffset "xs" xs xsOffset + ++ String.cons ' ' (Internal.colOffset "sm" sm smOffset) + ++ String.cons ' ' (Internal.colOffset "md" md mdOffset) + } + -{-| colLgOffset_ -} +{-| colLgOffset_ +-} colLgOffset_ : Int -> Int -> Int -> Int -> Int -> Int -> Int -> Int -> List (Html msg) -> Html msg colLgOffset_ xs xsOffset sm smOffset md mdOffset lg lgOffset = - div' - { class = Internal.colOffset "xs" xs xsOffset - ++ ' ' `String.cons` Internal.colOffset "sm" sm smOffset - ++ ' ' `String.cons` Internal.colOffset "md" md mdOffset - ++ ' ' `String.cons` Internal.colOffset "lg" lg lgOffset - } + div_ + { class = + Internal.colOffset "xs" xs xsOffset + ++ String.cons ' ' (Internal.colOffset "sm" sm smOffset) + ++ String.cons ' ' (Internal.colOffset "md" md mdOffset) + ++ String.cons ' ' (Internal.colOffset "lg" lg lgOffset) + } --- Typography --- Code +-- Typography +-- Code -- Tables --table' : ClassString -> List (Html msg) -> Html msg --table' c = Html.tablec ("table " ++ c) --table_ : List (Html msg) -> Html msg --table_ c = tablec "" + {-| A table with [striped rows](http://getbootstrap.com/css/#tables-striped) -} -tableStriped' : ClassString -> List (Html msg) -> Html msg -tableStriped' c = table' {class = "table table-striped " ++ c} +tableStriped_ : ClassString -> List (Html msg) -> Html msg +tableStriped_ c = + table_ { class = "table table-striped " ++ c } + + {-| import Html exposing (..) import Html.Shorthand exposing (..) @@ -428,12 +474,16 @@ tableStriped' c = table' {class = "table table-striped " ++ c} main = view -} tableStriped_ : List (Html msg) -> Html msg -tableStriped_ = tableStriped' "" +tableStriped_ = + tableStriped_ "" + {-| A table with striped `tbody`s instead of rows. See [Can we have multiple <tbody> in same <table>?](http://stackoverflow.com/questions/3076708/can-we-have-multiple-tbody-in-same-table) -} -tableBodyStriped' : ClassString -> List (Html msg) -> Html msg -tableBodyStriped' c = table' {class = "table table-body-striped " ++ c} +tableBodyStriped_ : ClassString -> List (Html msg) -> Html msg +tableBodyStriped_ c = + table_ { class = "table table-body-striped " ++ c } + {-| import Html exposing (text) @@ -471,23 +521,32 @@ tableBodyStriped' c = table' {class = "table table-body-striped " ++ c} ] -} tableBodyStriped_ : List (Html msg) -> Html msg -tableBodyStriped_ = tableBodyStriped' "" +tableBodyStriped_ = + tableBodyStriped_ "" + + -- Forms -{-| formGroup_ -} + + +{-| formGroup_ +-} formGroup_ : List (Html msg) -> Html msg -formGroup_ = div' {class = "form-group"} +formGroup_ = + div_ { class = "form-group" } + + -- Buttons -- TODO: perhaps instead --type alias BtnApi = -- { xs : { success : ClassString -> (Maybe Html, TextString, Maybe String) -> Html msg } -- } - --btn = -- { xs = { success = btnXsSuccess' } -- } + {-| Optional parameters for bootstrap buttons. * `icon` - an icon for the button (see `glyphicon`s) @@ -497,7 +556,9 @@ formGroup_ = div' {class = "form-group"} See also [BtnParam](http://package.elm-lang.org/packages/circuithub/elm-bootstrap-html/latest/Bootstrap-Html-Internal#BtnParam) -} -type alias BtnParam msg = Internal.BtnParam msg +type alias BtnParam msg = + Internal.BtnParam msg + {-| Default parameters for a button. Use this to select only one or two options. @@ -508,190 +569,409 @@ type alias BtnParam msg = Internal.BtnParam msg -} btnParam : BtnParam msg btnParam = - { icon = Nothing - , label = Nothing - , tooltip = Nothing - } - -{-| btnDefault' -} -btnDefault' : ClassString -> BtnParam msg -> msg -> Html msg -btnDefault' c p = Internal.btnc ("btn-default " ++ c) "button" p -{-| btnDefault_ -} + { icon = Nothing + , label = Nothing + , tooltip = Nothing + } + + +{-| btnDefault' +-} +btnDefault_ : ClassString -> BtnParam msg -> msg -> Html msg +btnDefault_ c p = + Internal.btnc ("btn-default " ++ c) "button" p + + +{-| btnDefault_ +-} btnDefault_ : BtnParam msg -> msg -> Html msg -btnDefault_ p = Internal.btnc "btn-default" "button" p -{-| btnXsDefault' -} -btnXsDefault' : ClassString -> BtnParam msg -> msg -> Html msg -btnXsDefault' c p = Internal.btnc ("btn-xs btn-default " ++ c) "button" p -{-| btnXsDefault_ -} +btnDefault_ p = + Internal.btnc "btn-default" "button" p + + +{-| btnXsDefault' +-} +btnXsDefault_ : ClassString -> BtnParam msg -> msg -> Html msg +btnXsDefault_ c p = + Internal.btnc ("btn-xs btn-default " ++ c) "button" p + + +{-| btnXsDefault_ +-} btnXsDefault_ : BtnParam msg -> msg -> Html msg -btnXsDefault_ p = Internal.btnc "btn-xs btn-default " "button" p -{-| btnSmDefault' -} -btnSmDefault' : ClassString -> BtnParam msg -> msg -> Html msg -btnSmDefault' c p = Internal.btnc ("btn-sm btn-default " ++ c) "button" p -{-| btnSmDefault_ -} +btnXsDefault_ p = + Internal.btnc "btn-xs btn-default " "button" p + + +{-| btnSmDefault' +-} +btnSmDefault_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSmDefault_ c p = + Internal.btnc ("btn-sm btn-default " ++ c) "button" p + + +{-| btnSmDefault_ +-} btnSmDefault_ : BtnParam msg -> msg -> Html msg -btnSmDefault_ p = Internal.btnc "btn-sm btn-default" "button" p -{-| btnLgDefault' -} -btnLgDefault' : ClassString -> BtnParam msg -> msg -> Html msg -btnLgDefault' c p = Internal.btnc ("btn-lg btn-default " ++ c) "button" p -{-| btnLgDefault_ -} +btnSmDefault_ p = + Internal.btnc "btn-sm btn-default" "button" p + + +{-| btnLgDefault' +-} +btnLgDefault_ : ClassString -> BtnParam msg -> msg -> Html msg +btnLgDefault_ c p = + Internal.btnc ("btn-lg btn-default " ++ c) "button" p + + +{-| btnLgDefault_ +-} btnLgDefault_ : BtnParam msg -> msg -> Html msg -btnLgDefault_ p = Internal.btnc "btn-lg btn-default" "button" p +btnLgDefault_ p = + Internal.btnc "btn-lg btn-default" "button" p -{-| btnPrimary' -} -btnPrimary' : ClassString -> BtnParam msg -> msg -> Html msg -btnPrimary' c p = Internal.btnc ("btn-primary " ++ c) "button" p -{-| btnPrimary_ -} + +{-| btnPrimary' +-} +btnPrimary_ : ClassString -> BtnParam msg -> msg -> Html msg +btnPrimary_ c p = + Internal.btnc ("btn-primary " ++ c) "button" p + + +{-| btnPrimary_ +-} btnPrimary_ : BtnParam msg -> msg -> Html msg -btnPrimary_ p = Internal.btnc "btn-primary" "button" p -{-| btnXsPrimary' -} -btnXsPrimary' : ClassString -> BtnParam msg -> msg -> Html msg -btnXsPrimary' c p = Internal.btnc ("btn-xs btn-primary " ++ c) "button" p -{-| btnXsPrimary_ -} +btnPrimary_ p = + Internal.btnc "btn-primary" "button" p + + +{-| btnXsPrimary' +-} +btnXsPrimary_ : ClassString -> BtnParam msg -> msg -> Html msg +btnXsPrimary_ c p = + Internal.btnc ("btn-xs btn-primary " ++ c) "button" p + + +{-| btnXsPrimary_ +-} btnXsPrimary_ : BtnParam msg -> msg -> Html msg -btnXsPrimary_ p = Internal.btnc "btn-xs btn-primary " "button" p -{-| btnSmPrimary' -} -btnSmPrimary' : ClassString -> BtnParam msg -> msg -> Html msg -btnSmPrimary' c p = Internal.btnc ("btn-sm btn-primary " ++ c) "button" p -{-| btnSmPrimary_ -} +btnXsPrimary_ p = + Internal.btnc "btn-xs btn-primary " "button" p + + +{-| btnSmPrimary' +-} +btnSmPrimary_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSmPrimary_ c p = + Internal.btnc ("btn-sm btn-primary " ++ c) "button" p + + +{-| btnSmPrimary_ +-} btnSmPrimary_ : BtnParam msg -> msg -> Html msg -btnSmPrimary_ p = Internal.btnc "btn-sm btn-primary" "button" p -{-| btnLgPrimary' -} -btnLgPrimary' : ClassString -> BtnParam msg -> msg -> Html msg -btnLgPrimary' c p = Internal.btnc ("btn-lg btn-primary " ++ c) "button" p -{-| btnLgPrimary_ -} +btnSmPrimary_ p = + Internal.btnc "btn-sm btn-primary" "button" p + + +{-| btnLgPrimary' +-} +btnLgPrimary_ : ClassString -> BtnParam msg -> msg -> Html msg +btnLgPrimary_ c p = + Internal.btnc ("btn-lg btn-primary " ++ c) "button" p + + +{-| btnLgPrimary_ +-} btnLgPrimary_ : BtnParam msg -> msg -> Html msg -btnLgPrimary_ p = Internal.btnc "btn-lg btn-primary" "button" p +btnLgPrimary_ p = + Internal.btnc "btn-lg btn-primary" "button" p + -{-| btnSuccess' -} -btnSuccess' : ClassString -> BtnParam msg -> msg -> Html msg -btnSuccess' c p = Internal.btnc ("btn-success " ++ c) "button" p -{-| btnSuccess_ -} +{-| btnSuccess' +-} +btnSuccess_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSuccess_ c p = + Internal.btnc ("btn-success " ++ c) "button" p + + +{-| btnSuccess_ +-} btnSuccess_ : BtnParam msg -> msg -> Html msg -btnSuccess_ p = Internal.btnc "btn-success" "button" p -{-| btnXsSuccess' -} -btnXsSuccess' : ClassString -> BtnParam msg -> msg -> Html msg -btnXsSuccess' c p = Internal.btnc ("btn-xs btn-success " ++ c) "button" p -{-| btnXsSuccess_ -} +btnSuccess_ p = + Internal.btnc "btn-success" "button" p + + +{-| btnXsSuccess' +-} +btnXsSuccess_ : ClassString -> BtnParam msg -> msg -> Html msg +btnXsSuccess_ c p = + Internal.btnc ("btn-xs btn-success " ++ c) "button" p + + +{-| btnXsSuccess_ +-} btnXsSuccess_ : BtnParam msg -> msg -> Html msg -btnXsSuccess_ p = Internal.btnc "btn-xs btn-success " "button" p -{-| btnSmSuccess' -} -btnSmSuccess' : ClassString -> BtnParam msg -> msg -> Html msg -btnSmSuccess' c p = Internal.btnc ("btn-sm btn-success " ++ c) "button" p -{-| btnSmSuccess_ -} +btnXsSuccess_ p = + Internal.btnc "btn-xs btn-success " "button" p + + +{-| btnSmSuccess' +-} +btnSmSuccess_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSmSuccess_ c p = + Internal.btnc ("btn-sm btn-success " ++ c) "button" p + + +{-| btnSmSuccess_ +-} btnSmSuccess_ : BtnParam msg -> msg -> Html msg -btnSmSuccess_ p = Internal.btnc "btn-sm btn-success" "button" p -{-| btnLgSuccess' -} -btnLgSuccess' : ClassString -> BtnParam msg -> msg -> Html msg -btnLgSuccess' c p = Internal.btnc ("btn-lg btn-success " ++ c) "button" p -{-| btnLgSuccess_ -} +btnSmSuccess_ p = + Internal.btnc "btn-sm btn-success" "button" p + + +{-| btnLgSuccess' +-} +btnLgSuccess_ : ClassString -> BtnParam msg -> msg -> Html msg +btnLgSuccess_ c p = + Internal.btnc ("btn-lg btn-success " ++ c) "button" p + + +{-| btnLgSuccess_ +-} btnLgSuccess_ : BtnParam msg -> msg -> Html msg -btnLgSuccess_ p = Internal.btnc "btn-lg btn-success" "button" p +btnLgSuccess_ p = + Internal.btnc "btn-lg btn-success" "button" p + + +{-| btnInfo' +-} +btnInfo_ : ClassString -> BtnParam msg -> msg -> Html msg +btnInfo_ c p = + Internal.btnc ("btn-info " ++ c) "button" p + -{-| btnInfo' -} -btnInfo' : ClassString -> BtnParam msg -> msg -> Html msg -btnInfo' c p = Internal.btnc ("btn-info " ++ c) "button" p -{-| btnInfo_ -} +{-| btnInfo_ +-} btnInfo_ : BtnParam msg -> msg -> Html msg -btnInfo_ p = Internal.btnc "btn-info" "button" p -{-| btnXsInfo' -} -btnXsInfo' : ClassString -> BtnParam msg -> msg -> Html msg -btnXsInfo' c p = Internal.btnc ("btn-xs btn-info " ++ c) "button" p -{-| btnXsInfo_ -} +btnInfo_ p = + Internal.btnc "btn-info" "button" p + + +{-| btnXsInfo' +-} +btnXsInfo_ : ClassString -> BtnParam msg -> msg -> Html msg +btnXsInfo_ c p = + Internal.btnc ("btn-xs btn-info " ++ c) "button" p + + +{-| btnXsInfo_ +-} btnXsInfo_ : BtnParam msg -> msg -> Html msg -btnXsInfo_ p = Internal.btnc "btn-xs btn-info " "button" p -{-| btnSmInfo' -} -btnSmInfo' : ClassString -> BtnParam msg -> msg -> Html msg -btnSmInfo' c p = Internal.btnc ("btn-sm btn-info " ++ c) "button" p -{-| btnSmInfo_ -} +btnXsInfo_ p = + Internal.btnc "btn-xs btn-info " "button" p + + +{-| btnSmInfo' +-} +btnSmInfo_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSmInfo_ c p = + Internal.btnc ("btn-sm btn-info " ++ c) "button" p + + +{-| btnSmInfo_ +-} btnSmInfo_ : BtnParam msg -> msg -> Html msg -btnSmInfo_ p = Internal.btnc "btn-sm btn-info" "button" p -{-| btnLgInfo' -} -btnLgInfo' : ClassString -> BtnParam msg -> msg -> Html msg -btnLgInfo' c p = Internal.btnc ("btn-lg btn-info " ++ c) "button" p -{-| btnLgInfo_ -} +btnSmInfo_ p = + Internal.btnc "btn-sm btn-info" "button" p + + +{-| btnLgInfo' +-} +btnLgInfo_ : ClassString -> BtnParam msg -> msg -> Html msg +btnLgInfo_ c p = + Internal.btnc ("btn-lg btn-info " ++ c) "button" p + + +{-| btnLgInfo_ +-} btnLgInfo_ : BtnParam msg -> msg -> Html msg -btnLgInfo_ p = Internal.btnc "btn-lg btn-info" "button" p +btnLgInfo_ p = + Internal.btnc "btn-lg btn-info" "button" p + + +{-| btnWarning' +-} +btnWarning_ : ClassString -> BtnParam msg -> msg -> Html msg +btnWarning_ c p = + Internal.btnc ("btn-warning " ++ c) "button" p -{-| btnWarning' -} -btnWarning' : ClassString -> BtnParam msg -> msg -> Html msg -btnWarning' c p = Internal.btnc ("btn-warning " ++ c) "button" p -{-| btnWarning_ -} + +{-| btnWarning_ +-} btnWarning_ : BtnParam msg -> msg -> Html msg -btnWarning_ p = Internal.btnc "btn-warning" "button" p -{-| btnXsWarning' -} -btnXsWarning' : ClassString -> BtnParam msg -> msg -> Html msg -btnXsWarning' c p = Internal.btnc ("btn-xs btn-warning " ++ c) "button" p -{-| btnXsWarning_ -} +btnWarning_ p = + Internal.btnc "btn-warning" "button" p + + +{-| btnXsWarning' +-} +btnXsWarning_ : ClassString -> BtnParam msg -> msg -> Html msg +btnXsWarning_ c p = + Internal.btnc ("btn-xs btn-warning " ++ c) "button" p + + +{-| btnXsWarning_ +-} btnXsWarning_ : BtnParam msg -> msg -> Html msg -btnXsWarning_ p = Internal.btnc "btn-xs btn-warning " "button" p -{-| btnSmWarning' -} -btnSmWarning' : ClassString -> BtnParam msg -> msg -> Html msg -btnSmWarning' c p = Internal.btnc ("btn-sm btn-warning " ++ c) "button" p -{-| btnSmWarning_ -} +btnXsWarning_ p = + Internal.btnc "btn-xs btn-warning " "button" p + + +{-| btnSmWarning' +-} +btnSmWarning_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSmWarning_ c p = + Internal.btnc ("btn-sm btn-warning " ++ c) "button" p + + +{-| btnSmWarning_ +-} btnSmWarning_ : BtnParam msg -> msg -> Html msg -btnSmWarning_ p = Internal.btnc "btn-sm btn-warning" "button" p -{-| btnLgWarning' -} -btnLgWarning' : ClassString -> BtnParam msg -> msg -> Html msg -btnLgWarning' c p = Internal.btnc ("btn-lg btn-warning " ++ c) "button" p -{-| btnLgWarning_ -} +btnSmWarning_ p = + Internal.btnc "btn-sm btn-warning" "button" p + + +{-| btnLgWarning' +-} +btnLgWarning_ : ClassString -> BtnParam msg -> msg -> Html msg +btnLgWarning_ c p = + Internal.btnc ("btn-lg btn-warning " ++ c) "button" p + + +{-| btnLgWarning_ +-} btnLgWarning_ : BtnParam msg -> msg -> Html msg -btnLgWarning_ p = Internal.btnc "btn-lg btn-warning" "button" p +btnLgWarning_ p = + Internal.btnc "btn-lg btn-warning" "button" p + + +{-| btnDanger' +-} +btnDanger_ : ClassString -> BtnParam msg -> msg -> Html msg +btnDanger_ c p = + Internal.btnc ("btn-danger " ++ c) "button" p + -{-| btnDanger' -} -btnDanger' : ClassString -> BtnParam msg -> msg -> Html msg -btnDanger' c p = Internal.btnc ("btn-danger " ++ c) "button" p -{-| btnDanger_ -} +{-| btnDanger_ +-} btnDanger_ : BtnParam msg -> msg -> Html msg -btnDanger_ p = Internal.btnc "btn-danger" "button" p -{-| btnXsDanger' -} -btnXsDanger' : ClassString -> BtnParam msg -> msg -> Html msg -btnXsDanger' c p = Internal.btnc ("btn-xs btn-danger " ++ c) "button" p -{-| btnXsDanger_ -} +btnDanger_ p = + Internal.btnc "btn-danger" "button" p + + +{-| btnXsDanger' +-} +btnXsDanger_ : ClassString -> BtnParam msg -> msg -> Html msg +btnXsDanger_ c p = + Internal.btnc ("btn-xs btn-danger " ++ c) "button" p + + +{-| btnXsDanger_ +-} btnXsDanger_ : BtnParam msg -> msg -> Html msg -btnXsDanger_ p = Internal.btnc "btn-xs btn-danger " "button" p -{-| btnSmDanger' -} -btnSmDanger' : ClassString -> BtnParam msg -> msg -> Html msg -btnSmDanger' c p = Internal.btnc ("btn-sm btn-danger " ++ c) "button" p -{-| btnSmDanger_ -} +btnXsDanger_ p = + Internal.btnc "btn-xs btn-danger " "button" p + + +{-| btnSmDanger' +-} +btnSmDanger_ : ClassString -> BtnParam msg -> msg -> Html msg +btnSmDanger_ c p = + Internal.btnc ("btn-sm btn-danger " ++ c) "button" p + + +{-| btnSmDanger_ +-} btnSmDanger_ : BtnParam msg -> msg -> Html msg -btnSmDanger_ p = Internal.btnc "btn-sm btn-danger" "button" p -{-| btnLgDanger' -} -btnLgDanger' : ClassString -> BtnParam msg -> msg -> Html msg -btnLgDanger' c p = Internal.btnc ("btn-lg btn-danger " ++ c) "button" p -{-| btnLgDanger_ -} +btnSmDanger_ p = + Internal.btnc "btn-sm btn-danger" "button" p + + +{-| btnLgDanger' +-} +btnLgDanger_ : ClassString -> BtnParam msg -> msg -> Html msg +btnLgDanger_ c p = + Internal.btnc ("btn-lg btn-danger " ++ c) "button" p + + +{-| btnLgDanger_ +-} btnLgDanger_ : BtnParam msg -> msg -> Html msg -btnLgDanger_ p = Internal.btnc "btn-lg btn-danger" "button" p +btnLgDanger_ p = + Internal.btnc "btn-lg btn-danger" "button" p + -{-| btnSubmitPrimary' -} -btnSubmitPrimary' : ClassString -> BtnParam msg -> Html msg -btnSubmitPrimary' c p = Internal.btncNoevent ("btn-primary " ++ c) "submit" p -{-| btnSubmitPrimary_ -} +{-| btnSubmitPrimary' +-} +btnSubmitPrimary_ : ClassString -> BtnParam msg -> Html msg +btnSubmitPrimary_ c p = + Internal.btncNoevent ("btn-primary " ++ c) "submit" p + + +{-| btnSubmitPrimary_ +-} btnSubmitPrimary_ : BtnParam msg -> Html msg -btnSubmitPrimary_ p = Internal.btncNoevent "btn-primary" "submit" p -{-| btnSubmitXsPrimary' -} -btnSubmitXsPrimary' : ClassString -> BtnParam msg -> Html msg -btnSubmitXsPrimary' c p = Internal.btncNoevent ("btn-xs btn-primary " ++ c) "submit" p -{-| btnSubmitXsPrimary_ -} +btnSubmitPrimary_ p = + Internal.btncNoevent "btn-primary" "submit" p + + +{-| btnSubmitXsPrimary' +-} +btnSubmitXsPrimary_ : ClassString -> BtnParam msg -> Html msg +btnSubmitXsPrimary_ c p = + Internal.btncNoevent ("btn-xs btn-primary " ++ c) "submit" p + + +{-| btnSubmitXsPrimary_ +-} btnSubmitXsPrimary_ : BtnParam msg -> Html msg -btnSubmitXsPrimary_ p = Internal.btncNoevent "btn-xs btn-primary " "submit" p -{-| btnSubmitSmPrimary' -} -btnSubmitSmPrimary' : ClassString -> BtnParam msg -> Html msg -btnSubmitSmPrimary' c p = Internal.btncNoevent ("btn-sm btn-primary " ++ c) "submit" p -{-| btnSubmitSmPrimary_ -} +btnSubmitXsPrimary_ p = + Internal.btncNoevent "btn-xs btn-primary " "submit" p + + +{-| btnSubmitSmPrimary' +-} +btnSubmitSmPrimary_ : ClassString -> BtnParam msg -> Html msg +btnSubmitSmPrimary_ c p = + Internal.btncNoevent ("btn-sm btn-primary " ++ c) "submit" p + + +{-| btnSubmitSmPrimary_ +-} btnSubmitSmPrimary_ : BtnParam msg -> Html msg -btnSubmitSmPrimary_ p = Internal.btncNoevent "btn-sm btn-primary" "submit" p -{-| btnSubmitLgPrimary' -} -btnSubmitLgPrimary' : ClassString -> BtnParam msg -> Html msg -btnSubmitLgPrimary' c p = Internal.btncNoevent ("btn-lg btn-primary " ++ c) "submit" p -{-| btnSubmitLgPrimary_ -} +btnSubmitSmPrimary_ p = + Internal.btncNoevent "btn-sm btn-primary" "submit" p + + +{-| btnSubmitLgPrimary' +-} +btnSubmitLgPrimary_ : ClassString -> BtnParam msg -> Html msg +btnSubmitLgPrimary_ c p = + Internal.btncNoevent ("btn-lg btn-primary " ++ c) "submit" p + + +{-| btnSubmitLgPrimary_ +-} btnSubmitLgPrimary_ : BtnParam msg -> Html msg -btnSubmitLgPrimary_ p = Internal.btncNoevent "btn-lg btn-primary" "submit" p +btnSubmitLgPrimary_ p = + Internal.btncNoevent "btn-lg btn-primary" "submit" p + --- Images +-- Images -- Helper classes + {-| Accessibility - Skip navigation body_ @@ -705,1224 +985,2823 @@ btnSubmitLgPrimary_ p = Internal.btncNoevent "btn-lg btn-primary" "submit" p -} skipNavigation_ : TextString -> Html msg skipNavigation_ t = - a' - { class = "sr-only sr-only-focusable" - , href = "#content" - } - [text t] + a_ + { class = "sr-only sr-only-focusable" + , href = "#content" + } + [ text t ] --- Responsive utilities --- Using Less +-- Responsive utilities +-- Using Less -- Using Sass - - -- COMPONENTS -- Glyphicons -{-| glyphiconAsterisk' -} -glyphiconAsterisk' : ClassString -> Html msg -glyphiconAsterisk' c = span' {class = "glyphicon glyphicon-asterisk " ++ c} [] -{-| glyphiconAsterisk_ -} + + +{-| glyphiconAsterisk' +-} +glyphiconAsterisk_ : ClassString -> Html msg +glyphiconAsterisk_ c = + span_ { class = "glyphicon glyphicon-asterisk " ++ c } [] + + +{-| glyphiconAsterisk_ +-} glyphiconAsterisk_ : Html msg -glyphiconAsterisk_ = glyphiconAsterisk' "" -{-| glyphiconPlus' -} -glyphiconPlus' : ClassString -> Html msg -glyphiconPlus' c = span' {class = "glyphicon glyphicon-plus " ++ c} [] -{-| glyphiconPlus_ -} +glyphiconAsterisk_ = + glyphiconAsterisk_ "" + + +{-| glyphiconPlus' +-} +glyphiconPlus_ : ClassString -> Html msg +glyphiconPlus_ c = + span_ { class = "glyphicon glyphicon-plus " ++ c } [] + + +{-| glyphiconPlus_ +-} glyphiconPlus_ : Html msg -glyphiconPlus_ = glyphiconPlus' "" -{-| glyphiconEuro' -} -glyphiconEuro' : ClassString -> Html msg -glyphiconEuro' c = span' {class = "glyphicon glyphicon-euro " ++ c} [] -{-| glyphiconEuro_ -} +glyphiconPlus_ = + glyphiconPlus_ "" + + +{-| glyphiconEuro' +-} +glyphiconEuro_ : ClassString -> Html msg +glyphiconEuro_ c = + span_ { class = "glyphicon glyphicon-euro " ++ c } [] + + +{-| glyphiconEuro_ +-} glyphiconEuro_ : Html msg -glyphiconEuro_ = glyphiconEuro' "" -{-| glyphiconMinus' -} -glyphiconMinus' : ClassString -> Html msg -glyphiconMinus' c = span' {class = "glyphicon glyphicon-minus " ++ c} [] -{-| glyphiconMinus_ -} +glyphiconEuro_ = + glyphiconEuro_ "" + + +{-| glyphiconMinus' +-} +glyphiconMinus_ : ClassString -> Html msg +glyphiconMinus_ c = + span_ { class = "glyphicon glyphicon-minus " ++ c } [] + + +{-| glyphiconMinus_ +-} glyphiconMinus_ : Html msg -glyphiconMinus_ = glyphiconMinus' "" -{-| glyphiconCloud' -} -glyphiconCloud' : ClassString -> Html msg -glyphiconCloud' c = span' {class = "glyphicon glyphicon-cloud " ++ c} [] -{-| glyphiconCloud_ -} -glyphiconCloud_ : Html msg -glyphiconCloud_ = glyphiconCloud' "" -{-| glyphiconEnvelope' -} -glyphiconEnvelope' : ClassString -> Html msg -glyphiconEnvelope' c = span' {class = "glyphicon glyphicon-envelope " ++ c} [] -{-| glyphiconEnvelope_ -} -glyphiconEnvelope_ : Html msg -glyphiconEnvelope_ = glyphiconEnvelope' "" -{-| glyphiconPencil' -} -glyphiconPencil' : ClassString -> Html msg -glyphiconPencil' c = span' {class = "glyphicon glyphicon-pencil " ++ c} [] -{-| glyphiconPencil_ -} -glyphiconPencil_ : Html msg -glyphiconPencil_ = glyphiconPencil' "" -{-| glyphiconGlass' -} -glyphiconGlass' : ClassString -> Html msg -glyphiconGlass' c = span' {class = "glyphicon glyphicon-glass " ++ c} [] -{-| glyphiconGlass_ -} -glyphiconGlass_ : Html msg -glyphiconGlass_ = glyphiconGlass' "" -{-| glyphiconMusic' -} -glyphiconMusic' : ClassString -> Html msg -glyphiconMusic' c = span' {class = "glyphicon glyphicon-music " ++ c} [] -{-| glyphiconMusic_ -} +glyphiconMinus_ = + glyphiconMinus_ "" + + +{-| glyphiconCloud' +-} +glyphiconCloud_ : ClassString -> Html msg +glyphiconCloud_ c = + span_ { class = "glyphicon glyphicon-cloud " ++ c } [] + + +{-| glyphiconCloud_ +-} +glyphiconCloud_ : Html msg +glyphiconCloud_ = + glyphiconCloud_ "" + + +{-| glyphiconEnvelope' +-} +glyphiconEnvelope_ : ClassString -> Html msg +glyphiconEnvelope_ c = + span_ { class = "glyphicon glyphicon-envelope " ++ c } [] + + +{-| glyphiconEnvelope_ +-} +glyphiconEnvelope_ : Html msg +glyphiconEnvelope_ = + glyphiconEnvelope_ "" + + +{-| glyphiconPencil' +-} +glyphiconPencil_ : ClassString -> Html msg +glyphiconPencil_ c = + span_ { class = "glyphicon glyphicon-pencil " ++ c } [] + + +{-| glyphiconPencil_ +-} +glyphiconPencil_ : Html msg +glyphiconPencil_ = + glyphiconPencil_ "" + + +{-| glyphiconGlass' +-} +glyphiconGlass_ : ClassString -> Html msg +glyphiconGlass_ c = + span_ { class = "glyphicon glyphicon-glass " ++ c } [] + + +{-| glyphiconGlass_ +-} +glyphiconGlass_ : Html msg +glyphiconGlass_ = + glyphiconGlass_ "" + + +{-| glyphiconMusic' +-} +glyphiconMusic_ : ClassString -> Html msg +glyphiconMusic_ c = + span_ { class = "glyphicon glyphicon-music " ++ c } [] + + +{-| glyphiconMusic_ +-} glyphiconMusic_ : Html msg -glyphiconMusic_ = glyphiconMusic' "" -{-| glyphiconSearch' -} -glyphiconSearch' : ClassString -> Html msg -glyphiconSearch' c = span' {class = "glyphicon glyphicon-search " ++ c} [] -{-| glyphiconSearch_ -} +glyphiconMusic_ = + glyphiconMusic_ "" + + +{-| glyphiconSearch' +-} +glyphiconSearch_ : ClassString -> Html msg +glyphiconSearch_ c = + span_ { class = "glyphicon glyphicon-search " ++ c } [] + + +{-| glyphiconSearch_ +-} glyphiconSearch_ : Html msg -glyphiconSearch_ = glyphiconSearch' "" -{-| glyphiconHeart' -} -glyphiconHeart' : ClassString -> Html msg -glyphiconHeart' c = span' {class = "glyphicon glyphicon-heart " ++ c} [] -{-| glyphiconHeart_ -} +glyphiconSearch_ = + glyphiconSearch_ "" + + +{-| glyphiconHeart' +-} +glyphiconHeart_ : ClassString -> Html msg +glyphiconHeart_ c = + span_ { class = "glyphicon glyphicon-heart " ++ c } [] + + +{-| glyphiconHeart_ +-} glyphiconHeart_ : Html msg -glyphiconHeart_ = glyphiconHeart' "" -{-| glyphiconStar' -} -glyphiconStar' : ClassString -> Html msg -glyphiconStar' c = span' {class = "glyphicon glyphicon-star " ++ c} [] -{-| glyphiconStar_ -} +glyphiconHeart_ = + glyphiconHeart_ "" + + +{-| glyphiconStar' +-} +glyphiconStar_ : ClassString -> Html msg +glyphiconStar_ c = + span_ { class = "glyphicon glyphicon-star " ++ c } [] + + +{-| glyphiconStar_ +-} glyphiconStar_ : Html msg -glyphiconStar_ = glyphiconStar' "" -{-| glyphiconStarEmpty' -} -glyphiconStarEmpty' : ClassString -> Html msg -glyphiconStarEmpty' c = span' {class = "glyphicon glyphicon-star-empty " ++ c} [] -{-| glyphiconStarEmpty_ -} +glyphiconStar_ = + glyphiconStar_ "" + + +{-| glyphiconStarEmpty' +-} +glyphiconStarEmpty_ : ClassString -> Html msg +glyphiconStarEmpty_ c = + span_ { class = "glyphicon glyphicon-star-empty " ++ c } [] + + +{-| glyphiconStarEmpty_ +-} glyphiconStarEmpty_ : Html msg -glyphiconStarEmpty_ = glyphiconStarEmpty' "" -{-| glyphiconUser' -} -glyphiconUser' : ClassString -> Html msg -glyphiconUser' c = span' {class = "glyphicon glyphicon-user " ++ c} [] -{-| glyphiconUser_ -} +glyphiconStarEmpty_ = + glyphiconStarEmpty_ "" + + +{-| glyphiconUser' +-} +glyphiconUser_ : ClassString -> Html msg +glyphiconUser_ c = + span_ { class = "glyphicon glyphicon-user " ++ c } [] + + +{-| glyphiconUser_ +-} glyphiconUser_ : Html msg -glyphiconUser_ = glyphiconUser' "" -{-| glyphiconFilm' -} -glyphiconFilm' : ClassString -> Html msg -glyphiconFilm' c = span' {class = "glyphicon glyphicon-film " ++ c} [] -{-| glyphiconFilm_ -} +glyphiconUser_ = + glyphiconUser_ "" + + +{-| glyphiconFilm' +-} +glyphiconFilm_ : ClassString -> Html msg +glyphiconFilm_ c = + span_ { class = "glyphicon glyphicon-film " ++ c } [] + + +{-| glyphiconFilm_ +-} glyphiconFilm_ : Html msg -glyphiconFilm_ = glyphiconFilm' "" -{-| glyphiconThLarge' -} -glyphiconThLarge' : ClassString -> Html msg -glyphiconThLarge' c = span' {class = "glyphicon glyphicon-th-large " ++ c} [] -{-| glyphiconThLarge_ -} +glyphiconFilm_ = + glyphiconFilm_ "" + + +{-| glyphiconThLarge' +-} +glyphiconThLarge_ : ClassString -> Html msg +glyphiconThLarge_ c = + span_ { class = "glyphicon glyphicon-th-large " ++ c } [] + + +{-| glyphiconThLarge_ +-} glyphiconThLarge_ : Html msg -glyphiconThLarge_ = glyphiconThLarge' "" -{-| glyphiconTh' -} -glyphiconTh' : ClassString -> Html msg -glyphiconTh' c = span' {class = "glyphicon glyphicon-th " ++ c} [] -{-| glyphiconTh_ -} +glyphiconThLarge_ = + glyphiconThLarge_ "" + + +{-| glyphiconTh' +-} +glyphiconTh_ : ClassString -> Html msg +glyphiconTh_ c = + span_ { class = "glyphicon glyphicon-th " ++ c } [] + + +{-| glyphiconTh_ +-} glyphiconTh_ : Html msg -glyphiconTh_ = glyphiconTh' "" -{-| glyphiconThList' -} -glyphiconThList' : ClassString -> Html msg -glyphiconThList' c = span' {class = "glyphicon glyphicon-th-list " ++ c} [] -{-| glyphiconThList_ -} +glyphiconTh_ = + glyphiconTh_ "" + + +{-| glyphiconThList' +-} +glyphiconThList_ : ClassString -> Html msg +glyphiconThList_ c = + span_ { class = "glyphicon glyphicon-th-list " ++ c } [] + + +{-| glyphiconThList_ +-} glyphiconThList_ : Html msg -glyphiconThList_ = glyphiconThList' "" -{-| glyphiconOk' -} -glyphiconOk' : ClassString -> Html msg -glyphiconOk' c = span' {class = "glyphicon glyphicon-ok " ++ c} [] -{-| glyphiconOk_ -} +glyphiconThList_ = + glyphiconThList_ "" + + +{-| glyphiconOk' +-} +glyphiconOk_ : ClassString -> Html msg +glyphiconOk_ c = + span_ { class = "glyphicon glyphicon-ok " ++ c } [] + + +{-| glyphiconOk_ +-} glyphiconOk_ : Html msg -glyphiconOk_ = glyphiconOk' "" -{-| glyphiconRemove' -} -glyphiconRemove' : ClassString -> Html msg -glyphiconRemove' c = span' {class = "glyphicon glyphicon-remove " ++ c} [] -{-| glyphiconRemove_ -} +glyphiconOk_ = + glyphiconOk_ "" + + +{-| glyphiconRemove' +-} +glyphiconRemove_ : ClassString -> Html msg +glyphiconRemove_ c = + span_ { class = "glyphicon glyphicon-remove " ++ c } [] + + +{-| glyphiconRemove_ +-} glyphiconRemove_ : Html msg -glyphiconRemove_ = glyphiconRemove' "" -{-| glyphiconZoomIn' -} -glyphiconZoomIn' : ClassString -> Html msg -glyphiconZoomIn' c = span' {class = "glyphicon glyphicon-zoom-in " ++ c} [] -{-| glyphiconZoomIn_ -} +glyphiconRemove_ = + glyphiconRemove_ "" + + +{-| glyphiconZoomIn' +-} +glyphiconZoomIn_ : ClassString -> Html msg +glyphiconZoomIn_ c = + span_ { class = "glyphicon glyphicon-zoom-in " ++ c } [] + + +{-| glyphiconZoomIn_ +-} glyphiconZoomIn_ : Html msg -glyphiconZoomIn_ = glyphiconZoomIn' "" -{-| glyphiconZoomOut' -} -glyphiconZoomOut' : ClassString -> Html msg -glyphiconZoomOut' c = span' {class = "glyphicon glyphicon-zoom-out " ++ c} [] -{-| glyphiconZoomOut_ -} +glyphiconZoomIn_ = + glyphiconZoomIn_ "" + + +{-| glyphiconZoomOut' +-} +glyphiconZoomOut_ : ClassString -> Html msg +glyphiconZoomOut_ c = + span_ { class = "glyphicon glyphicon-zoom-out " ++ c } [] + + +{-| glyphiconZoomOut_ +-} glyphiconZoomOut_ : Html msg -glyphiconZoomOut_ = glyphiconZoomOut' "" -{-| glyphiconOff' -} -glyphiconOff' : ClassString -> Html msg -glyphiconOff' c = span' {class = "glyphicon glyphicon-off " ++ c} [] -{-| glyphiconOff_ -} +glyphiconZoomOut_ = + glyphiconZoomOut_ "" + + +{-| glyphiconOff' +-} +glyphiconOff_ : ClassString -> Html msg +glyphiconOff_ c = + span_ { class = "glyphicon glyphicon-off " ++ c } [] + + +{-| glyphiconOff_ +-} glyphiconOff_ : Html msg -glyphiconOff_ = glyphiconOff' "" -{-| glyphiconSignal' -} -glyphiconSignal' : ClassString -> Html msg -glyphiconSignal' c = span' {class = "glyphicon glyphicon-signal " ++ c} [] -{-| glyphiconSignal_ -} +glyphiconOff_ = + glyphiconOff_ "" + + +{-| glyphiconSignal' +-} +glyphiconSignal_ : ClassString -> Html msg +glyphiconSignal_ c = + span_ { class = "glyphicon glyphicon-signal " ++ c } [] + + +{-| glyphiconSignal_ +-} glyphiconSignal_ : Html msg -glyphiconSignal_ = glyphiconSignal' "" -{-| glyphiconCog' -} -glyphiconCog' : ClassString -> Html msg -glyphiconCog' c = span' {class = "glyphicon glyphicon-cog " ++ c} [] -{-| glyphiconCog_ -} +glyphiconSignal_ = + glyphiconSignal_ "" + + +{-| glyphiconCog' +-} +glyphiconCog_ : ClassString -> Html msg +glyphiconCog_ c = + span_ { class = "glyphicon glyphicon-cog " ++ c } [] + + +{-| glyphiconCog_ +-} glyphiconCog_ : Html msg -glyphiconCog_ = glyphiconCog' "" -{-| glyphiconTrash' -} -glyphiconTrash' : ClassString -> Html msg -glyphiconTrash' c = span' {class = "glyphicon glyphicon-trash " ++ c} [] -{-| glyphiconTrash_ -} +glyphiconCog_ = + glyphiconCog_ "" + + +{-| glyphiconTrash' +-} +glyphiconTrash_ : ClassString -> Html msg +glyphiconTrash_ c = + span_ { class = "glyphicon glyphicon-trash " ++ c } [] + + +{-| glyphiconTrash_ +-} glyphiconTrash_ : Html msg -glyphiconTrash_ = glyphiconTrash' "" -{-| glyphiconHome' -} -glyphiconHome' : ClassString -> Html msg -glyphiconHome' c = span' {class = "glyphicon glyphicon-home " ++ c} [] -{-| glyphiconHome_ -} +glyphiconTrash_ = + glyphiconTrash_ "" + + +{-| glyphiconHome' +-} +glyphiconHome_ : ClassString -> Html msg +glyphiconHome_ c = + span_ { class = "glyphicon glyphicon-home " ++ c } [] + + +{-| glyphiconHome_ +-} glyphiconHome_ : Html msg -glyphiconHome_ = glyphiconHome' "" -{-| glyphiconFile' -} -glyphiconFile' : ClassString -> Html msg -glyphiconFile' c = span' {class = "glyphicon glyphicon-file " ++ c} [] -{-| glyphiconFile_ -} +glyphiconHome_ = + glyphiconHome_ "" + + +{-| glyphiconFile' +-} +glyphiconFile_ : ClassString -> Html msg +glyphiconFile_ c = + span_ { class = "glyphicon glyphicon-file " ++ c } [] + + +{-| glyphiconFile_ +-} glyphiconFile_ : Html msg -glyphiconFile_ = glyphiconFile' "" -{-| glyphiconTime' -} -glyphiconTime' : ClassString -> Html msg -glyphiconTime' c = span' {class = "glyphicon glyphicon-time " ++ c} [] -{-| glyphiconTime_ -} +glyphiconFile_ = + glyphiconFile_ "" + + +{-| glyphiconTime' +-} +glyphiconTime_ : ClassString -> Html msg +glyphiconTime_ c = + span_ { class = "glyphicon glyphicon-time " ++ c } [] + + +{-| glyphiconTime_ +-} glyphiconTime_ : Html msg -glyphiconTime_ = glyphiconTime' "" -{-| glyphiconRoad' -} -glyphiconRoad' : ClassString -> Html msg -glyphiconRoad' c = span' {class = "glyphicon glyphicon-road " ++ c} [] -{-| glyphiconRoad_ -} +glyphiconTime_ = + glyphiconTime_ "" + + +{-| glyphiconRoad' +-} +glyphiconRoad_ : ClassString -> Html msg +glyphiconRoad_ c = + span_ { class = "glyphicon glyphicon-road " ++ c } [] + + +{-| glyphiconRoad_ +-} glyphiconRoad_ : Html msg -glyphiconRoad_ = glyphiconRoad' "" -{-| glyphiconDownloadAlt' -} -glyphiconDownloadAlt' : ClassString -> Html msg -glyphiconDownloadAlt' c = span' {class = "glyphicon glyphicon-download-alt " ++ c} [] -{-| glyphiconDownloadAlt_ -} +glyphiconRoad_ = + glyphiconRoad_ "" + + +{-| glyphiconDownloadAlt' +-} +glyphiconDownloadAlt_ : ClassString -> Html msg +glyphiconDownloadAlt_ c = + span_ { class = "glyphicon glyphicon-download-alt " ++ c } [] + + +{-| glyphiconDownloadAlt_ +-} glyphiconDownloadAlt_ : Html msg -glyphiconDownloadAlt_ = glyphiconDownloadAlt' "" -{-| glyphiconDownload' -} -glyphiconDownload' : ClassString -> Html msg -glyphiconDownload' c = span' {class = "glyphicon glyphicon-download " ++ c} [] -{-| glyphiconDownload_ -} +glyphiconDownloadAlt_ = + glyphiconDownloadAlt_ "" + + +{-| glyphiconDownload' +-} +glyphiconDownload_ : ClassString -> Html msg +glyphiconDownload_ c = + span_ { class = "glyphicon glyphicon-download " ++ c } [] + + +{-| glyphiconDownload_ +-} glyphiconDownload_ : Html msg -glyphiconDownload_ = glyphiconDownload' "" -{-| glyphiconUpload' -} -glyphiconUpload' : ClassString -> Html msg -glyphiconUpload' c = span' {class = "glyphicon glyphicon-upload " ++ c} [] -{-| glyphiconUpload_ -} +glyphiconDownload_ = + glyphiconDownload_ "" + + +{-| glyphiconUpload' +-} +glyphiconUpload_ : ClassString -> Html msg +glyphiconUpload_ c = + span_ { class = "glyphicon glyphicon-upload " ++ c } [] + + +{-| glyphiconUpload_ +-} glyphiconUpload_ : Html msg -glyphiconUpload_ = glyphiconUpload' "" -{-| glyphiconInbox' -} -glyphiconInbox' : ClassString -> Html msg -glyphiconInbox' c = span' {class = "glyphicon glyphicon-inbox " ++ c} [] -{-| glyphiconInbox_ -} +glyphiconUpload_ = + glyphiconUpload_ "" + + +{-| glyphiconInbox' +-} +glyphiconInbox_ : ClassString -> Html msg +glyphiconInbox_ c = + span_ { class = "glyphicon glyphicon-inbox " ++ c } [] + + +{-| glyphiconInbox_ +-} glyphiconInbox_ : Html msg -glyphiconInbox_ = glyphiconInbox' "" -{-| glyphiconPlayCircle' -} -glyphiconPlayCircle' : ClassString -> Html msg -glyphiconPlayCircle' c = span' {class = "glyphicon glyphicon-play-circle " ++ c} [] -{-| glyphiconPlayCircle_ -} +glyphiconInbox_ = + glyphiconInbox_ "" + + +{-| glyphiconPlayCircle' +-} +glyphiconPlayCircle_ : ClassString -> Html msg +glyphiconPlayCircle_ c = + span_ { class = "glyphicon glyphicon-play-circle " ++ c } [] + + +{-| glyphiconPlayCircle_ +-} glyphiconPlayCircle_ : Html msg -glyphiconPlayCircle_ = glyphiconPlayCircle' "" -{-| glyphiconRepeat' -} -glyphiconRepeat' : ClassString -> Html msg -glyphiconRepeat' c = span' {class = "glyphicon glyphicon-repeat " ++ c} [] -{-| glyphiconRepeat_ -} +glyphiconPlayCircle_ = + glyphiconPlayCircle_ "" + + +{-| glyphiconRepeat' +-} +glyphiconRepeat_ : ClassString -> Html msg +glyphiconRepeat_ c = + span_ { class = "glyphicon glyphicon-repeat " ++ c } [] + + +{-| glyphiconRepeat_ +-} glyphiconRepeat_ : Html msg -glyphiconRepeat_ = glyphiconRepeat' "" -{-| glyphiconRefresh' -} -glyphiconRefresh' : ClassString -> Html msg -glyphiconRefresh' c = span' {class = "glyphicon glyphicon-refresh " ++ c} [] -{-| glyphiconRefresh_ -} +glyphiconRepeat_ = + glyphiconRepeat_ "" + + +{-| glyphiconRefresh' +-} +glyphiconRefresh_ : ClassString -> Html msg +glyphiconRefresh_ c = + span_ { class = "glyphicon glyphicon-refresh " ++ c } [] + + +{-| glyphiconRefresh_ +-} glyphiconRefresh_ : Html msg -glyphiconRefresh_ = glyphiconRefresh' "" -{-| glyphiconListAlt' -} -glyphiconListAlt' : ClassString -> Html msg -glyphiconListAlt' c = span' {class = "glyphicon glyphicon-list-alt " ++ c} [] -{-| glyphiconListAlt_ -} +glyphiconRefresh_ = + glyphiconRefresh_ "" + + +{-| glyphiconListAlt' +-} +glyphiconListAlt_ : ClassString -> Html msg +glyphiconListAlt_ c = + span_ { class = "glyphicon glyphicon-list-alt " ++ c } [] + + +{-| glyphiconListAlt_ +-} glyphiconListAlt_ : Html msg -glyphiconListAlt_ = glyphiconListAlt' "" -{-| glyphiconLock' -} -glyphiconLock' : ClassString -> Html msg -glyphiconLock' c = span' {class = "glyphicon glyphicon-lock " ++ c} [] -{-| glyphiconLock_ -} +glyphiconListAlt_ = + glyphiconListAlt_ "" + + +{-| glyphiconLock' +-} +glyphiconLock_ : ClassString -> Html msg +glyphiconLock_ c = + span_ { class = "glyphicon glyphicon-lock " ++ c } [] + + +{-| glyphiconLock_ +-} glyphiconLock_ : Html msg -glyphiconLock_ = glyphiconLock' "" -{-| glyphiconFlag' -} -glyphiconFlag' : ClassString -> Html msg -glyphiconFlag' c = span' {class = "glyphicon glyphicon-flag " ++ c} [] -{-| glyphiconFlag_ -} +glyphiconLock_ = + glyphiconLock_ "" + + +{-| glyphiconFlag' +-} +glyphiconFlag_ : ClassString -> Html msg +glyphiconFlag_ c = + span_ { class = "glyphicon glyphicon-flag " ++ c } [] + + +{-| glyphiconFlag_ +-} glyphiconFlag_ : Html msg -glyphiconFlag_ = glyphiconFlag' "" -{-| glyphiconHeadphones' -} -glyphiconHeadphones' : ClassString -> Html msg -glyphiconHeadphones' c = span' {class = "glyphicon glyphicon-headphones " ++ c} [] -{-| glyphiconHeadphones_ -} +glyphiconFlag_ = + glyphiconFlag_ "" + + +{-| glyphiconHeadphones' +-} +glyphiconHeadphones_ : ClassString -> Html msg +glyphiconHeadphones_ c = + span_ { class = "glyphicon glyphicon-headphones " ++ c } [] + + +{-| glyphiconHeadphones_ +-} glyphiconHeadphones_ : Html msg -glyphiconHeadphones_ = glyphiconHeadphones' "" -{-| glyphiconVolumeOff' -} -glyphiconVolumeOff' : ClassString -> Html msg -glyphiconVolumeOff' c = span' {class = "glyphicon glyphicon-volume-off " ++ c} [] -{-| glyphiconVolumeOff_ -} +glyphiconHeadphones_ = + glyphiconHeadphones_ "" + + +{-| glyphiconVolumeOff' +-} +glyphiconVolumeOff_ : ClassString -> Html msg +glyphiconVolumeOff_ c = + span_ { class = "glyphicon glyphicon-volume-off " ++ c } [] + + +{-| glyphiconVolumeOff_ +-} glyphiconVolumeOff_ : Html msg -glyphiconVolumeOff_ = glyphiconVolumeOff' "" -{-| glyphiconVolumeDown' -} -glyphiconVolumeDown' : ClassString -> Html msg -glyphiconVolumeDown' c = span' {class = "glyphicon glyphicon-volume-down " ++ c} [] -{-| glyphiconVolumeDown_ -} +glyphiconVolumeOff_ = + glyphiconVolumeOff_ "" + + +{-| glyphiconVolumeDown' +-} +glyphiconVolumeDown_ : ClassString -> Html msg +glyphiconVolumeDown_ c = + span_ { class = "glyphicon glyphicon-volume-down " ++ c } [] + + +{-| glyphiconVolumeDown_ +-} glyphiconVolumeDown_ : Html msg -glyphiconVolumeDown_ = glyphiconVolumeDown' "" -{-| glyphiconVolumeUp' -} -glyphiconVolumeUp' : ClassString -> Html msg -glyphiconVolumeUp' c = span' {class = "glyphicon glyphicon-volume-up " ++ c} [] -{-| glyphiconVolumeUp_ -} +glyphiconVolumeDown_ = + glyphiconVolumeDown_ "" + + +{-| glyphiconVolumeUp' +-} +glyphiconVolumeUp_ : ClassString -> Html msg +glyphiconVolumeUp_ c = + span_ { class = "glyphicon glyphicon-volume-up " ++ c } [] + + +{-| glyphiconVolumeUp_ +-} glyphiconVolumeUp_ : Html msg -glyphiconVolumeUp_ = glyphiconVolumeUp' "" -{-| glyphiconQrcode' -} -glyphiconQrcode' : ClassString -> Html msg -glyphiconQrcode' c = span' {class = "glyphicon glyphicon-qrcode " ++ c} [] -{-| glyphiconQrcode_ -} +glyphiconVolumeUp_ = + glyphiconVolumeUp_ "" + + +{-| glyphiconQrcode' +-} +glyphiconQrcode_ : ClassString -> Html msg +glyphiconQrcode_ c = + span_ { class = "glyphicon glyphicon-qrcode " ++ c } [] + + +{-| glyphiconQrcode_ +-} glyphiconQrcode_ : Html msg -glyphiconQrcode_ = glyphiconQrcode' "" -{-| glyphiconBarcode' -} -glyphiconBarcode' : ClassString -> Html msg -glyphiconBarcode' c = span' {class = "glyphicon glyphicon-barcode " ++ c} [] -{-| glyphiconBarcode_ -} +glyphiconQrcode_ = + glyphiconQrcode_ "" + + +{-| glyphiconBarcode' +-} +glyphiconBarcode_ : ClassString -> Html msg +glyphiconBarcode_ c = + span_ { class = "glyphicon glyphicon-barcode " ++ c } [] + + +{-| glyphiconBarcode_ +-} glyphiconBarcode_ : Html msg -glyphiconBarcode_ = glyphiconBarcode' "" -{-| glyphiconTag' -} -glyphiconTag' : ClassString -> Html msg -glyphiconTag' c = span' {class = "glyphicon glyphicon-tag " ++ c} [] -{-| glyphiconTag_ -} +glyphiconBarcode_ = + glyphiconBarcode_ "" + + +{-| glyphiconTag' +-} +glyphiconTag_ : ClassString -> Html msg +glyphiconTag_ c = + span_ { class = "glyphicon glyphicon-tag " ++ c } [] + + +{-| glyphiconTag_ +-} glyphiconTag_ : Html msg -glyphiconTag_ = glyphiconTag' "" -{-| glyphiconTags' -} -glyphiconTags' : ClassString -> Html msg -glyphiconTags' c = span' {class = "glyphicon glyphicon-tags " ++ c} [] -{-| glyphiconTags_ -} +glyphiconTag_ = + glyphiconTag_ "" + + +{-| glyphiconTags' +-} +glyphiconTags_ : ClassString -> Html msg +glyphiconTags_ c = + span_ { class = "glyphicon glyphicon-tags " ++ c } [] + + +{-| glyphiconTags_ +-} glyphiconTags_ : Html msg -glyphiconTags_ = glyphiconTags' "" -{-| glyphiconBook' -} -glyphiconBook' : ClassString -> Html msg -glyphiconBook' c = span' {class = "glyphicon glyphicon-book " ++ c} [] -{-| glyphiconBook_ -} +glyphiconTags_ = + glyphiconTags_ "" + + +{-| glyphiconBook' +-} +glyphiconBook_ : ClassString -> Html msg +glyphiconBook_ c = + span_ { class = "glyphicon glyphicon-book " ++ c } [] + + +{-| glyphiconBook_ +-} glyphiconBook_ : Html msg -glyphiconBook_ = glyphiconBook' "" -{-| glyphiconBookmark' -} -glyphiconBookmark' : ClassString -> Html msg -glyphiconBookmark' c = span' {class = "glyphicon glyphicon-bookmark " ++ c} [] -{-| glyphiconBookmark_ -} +glyphiconBook_ = + glyphiconBook_ "" + + +{-| glyphiconBookmark' +-} +glyphiconBookmark_ : ClassString -> Html msg +glyphiconBookmark_ c = + span_ { class = "glyphicon glyphicon-bookmark " ++ c } [] + + +{-| glyphiconBookmark_ +-} glyphiconBookmark_ : Html msg -glyphiconBookmark_ = glyphiconBookmark' "" -{-| glyphiconPrint' -} -glyphiconPrint' : ClassString -> Html msg -glyphiconPrint' c = span' {class = "glyphicon glyphicon-print " ++ c} [] -{-| glyphiconPrint_ -} +glyphiconBookmark_ = + glyphiconBookmark_ "" + + +{-| glyphiconPrint' +-} +glyphiconPrint_ : ClassString -> Html msg +glyphiconPrint_ c = + span_ { class = "glyphicon glyphicon-print " ++ c } [] + + +{-| glyphiconPrint_ +-} glyphiconPrint_ : Html msg -glyphiconPrint_ = glyphiconPrint' "" -{-| glyphiconCamera' -} -glyphiconCamera' : ClassString -> Html msg -glyphiconCamera' c = span' {class = "glyphicon glyphicon-camera " ++ c} [] -{-| glyphiconCamera_ -} +glyphiconPrint_ = + glyphiconPrint_ "" + + +{-| glyphiconCamera' +-} +glyphiconCamera_ : ClassString -> Html msg +glyphiconCamera_ c = + span_ { class = "glyphicon glyphicon-camera " ++ c } [] + + +{-| glyphiconCamera_ +-} glyphiconCamera_ : Html msg -glyphiconCamera_ = glyphiconCamera' "" -{-| glyphiconFont' -} -glyphiconFont' : ClassString -> Html msg -glyphiconFont' c = span' {class = "glyphicon glyphicon-font " ++ c} [] -{-| glyphiconFont_ -} +glyphiconCamera_ = + glyphiconCamera_ "" + + +{-| glyphiconFont' +-} +glyphiconFont_ : ClassString -> Html msg +glyphiconFont_ c = + span_ { class = "glyphicon glyphicon-font " ++ c } [] + + +{-| glyphiconFont_ +-} glyphiconFont_ : Html msg -glyphiconFont_ = glyphiconFont' "" -{-| glyphiconBold' -} -glyphiconBold' : ClassString -> Html msg -glyphiconBold' c = span' {class = "glyphicon glyphicon-bold " ++ c} [] -{-| glyphiconBold_ -} +glyphiconFont_ = + glyphiconFont_ "" + + +{-| glyphiconBold' +-} +glyphiconBold_ : ClassString -> Html msg +glyphiconBold_ c = + span_ { class = "glyphicon glyphicon-bold " ++ c } [] + + +{-| glyphiconBold_ +-} glyphiconBold_ : Html msg -glyphiconBold_ = glyphiconBold' "" -{-| glyphiconItalic' -} -glyphiconItalic' : ClassString -> Html msg -glyphiconItalic' c = span' {class = "glyphicon glyphicon-italic " ++ c} [] -{-| glyphiconItalic_ -} +glyphiconBold_ = + glyphiconBold_ "" + + +{-| glyphiconItalic' +-} +glyphiconItalic_ : ClassString -> Html msg +glyphiconItalic_ c = + span_ { class = "glyphicon glyphicon-italic " ++ c } [] + + +{-| glyphiconItalic_ +-} glyphiconItalic_ : Html msg -glyphiconItalic_ = glyphiconItalic' "" -{-| glyphiconTextHeight' -} -glyphiconTextHeight' : ClassString -> Html msg -glyphiconTextHeight' c = span' {class = "glyphicon glyphicon-text-height " ++ c} [] -{-| glyphiconTextHeight_ -} +glyphiconItalic_ = + glyphiconItalic_ "" + + +{-| glyphiconTextHeight' +-} +glyphiconTextHeight_ : ClassString -> Html msg +glyphiconTextHeight_ c = + span_ { class = "glyphicon glyphicon-text-height " ++ c } [] + + +{-| glyphiconTextHeight_ +-} glyphiconTextHeight_ : Html msg -glyphiconTextHeight_ = glyphiconTextHeight' "" -{-| glyphiconTextWidth' -} -glyphiconTextWidth' : ClassString -> Html msg -glyphiconTextWidth' c = span' {class = "glyphicon glyphicon-text-width " ++ c} [] -{-| glyphiconTextWidth_ -} +glyphiconTextHeight_ = + glyphiconTextHeight_ "" + + +{-| glyphiconTextWidth' +-} +glyphiconTextWidth_ : ClassString -> Html msg +glyphiconTextWidth_ c = + span_ { class = "glyphicon glyphicon-text-width " ++ c } [] + + +{-| glyphiconTextWidth_ +-} glyphiconTextWidth_ : Html msg -glyphiconTextWidth_ = glyphiconTextWidth' "" -{-| glyphiconAlignLeft' -} -glyphiconAlignLeft' : ClassString -> Html msg -glyphiconAlignLeft' c = span' {class = "glyphicon glyphicon-align-left " ++ c} [] -{-| glyphiconAlignLeft_ -} +glyphiconTextWidth_ = + glyphiconTextWidth_ "" + + +{-| glyphiconAlignLeft' +-} +glyphiconAlignLeft_ : ClassString -> Html msg +glyphiconAlignLeft_ c = + span_ { class = "glyphicon glyphicon-align-left " ++ c } [] + + +{-| glyphiconAlignLeft_ +-} glyphiconAlignLeft_ : Html msg -glyphiconAlignLeft_ = glyphiconAlignLeft' "" -{-| glyphiconAlignCenter' -} -glyphiconAlignCenter' : ClassString -> Html msg -glyphiconAlignCenter' c = span' {class = "glyphicon glyphicon-align-center " ++ c} [] -{-| glyphiconAlignCenter_ -} +glyphiconAlignLeft_ = + glyphiconAlignLeft_ "" + + +{-| glyphiconAlignCenter' +-} +glyphiconAlignCenter_ : ClassString -> Html msg +glyphiconAlignCenter_ c = + span_ { class = "glyphicon glyphicon-align-center " ++ c } [] + + +{-| glyphiconAlignCenter_ +-} glyphiconAlignCenter_ : Html msg -glyphiconAlignCenter_ = glyphiconAlignCenter' "" -{-| glyphiconAlignRight' -} -glyphiconAlignRight' : ClassString -> Html msg -glyphiconAlignRight' c = span' {class = "glyphicon glyphicon-align-right " ++ c} [] -{-| glyphiconAlignRight_ -} +glyphiconAlignCenter_ = + glyphiconAlignCenter_ "" + + +{-| glyphiconAlignRight' +-} +glyphiconAlignRight_ : ClassString -> Html msg +glyphiconAlignRight_ c = + span_ { class = "glyphicon glyphicon-align-right " ++ c } [] + + +{-| glyphiconAlignRight_ +-} glyphiconAlignRight_ : Html msg -glyphiconAlignRight_ = glyphiconAlignRight' "" -{-| glyphiconAlignJustify' -} -glyphiconAlignJustify' : ClassString -> Html msg -glyphiconAlignJustify' c = span' {class = "glyphicon glyphicon-align-justify " ++ c} [] -{-| glyphiconAlignJustify_ -} +glyphiconAlignRight_ = + glyphiconAlignRight_ "" + + +{-| glyphiconAlignJustify' +-} +glyphiconAlignJustify_ : ClassString -> Html msg +glyphiconAlignJustify_ c = + span_ { class = "glyphicon glyphicon-align-justify " ++ c } [] + + +{-| glyphiconAlignJustify_ +-} glyphiconAlignJustify_ : Html msg -glyphiconAlignJustify_ = glyphiconAlignJustify' "" -{-| glyphiconList' -} -glyphiconList' : ClassString -> Html msg -glyphiconList' c = span' {class = "glyphicon glyphicon-list " ++ c} [] -{-| glyphiconList_ -} +glyphiconAlignJustify_ = + glyphiconAlignJustify_ "" + + +{-| glyphiconList' +-} +glyphiconList_ : ClassString -> Html msg +glyphiconList_ c = + span_ { class = "glyphicon glyphicon-list " ++ c } [] + + +{-| glyphiconList_ +-} glyphiconList_ : Html msg -glyphiconList_ = glyphiconList' "" -{-| glyphiconIndentLeft' -} -glyphiconIndentLeft' : ClassString -> Html msg -glyphiconIndentLeft' c = span' {class = "glyphicon glyphicon-indent-left " ++ c} [] -{-| glyphiconIndentLeft_ -} +glyphiconList_ = + glyphiconList_ "" + + +{-| glyphiconIndentLeft' +-} +glyphiconIndentLeft_ : ClassString -> Html msg +glyphiconIndentLeft_ c = + span_ { class = "glyphicon glyphicon-indent-left " ++ c } [] + + +{-| glyphiconIndentLeft_ +-} glyphiconIndentLeft_ : Html msg -glyphiconIndentLeft_ = glyphiconIndentLeft' "" -{-| glyphiconIndentRight' -} -glyphiconIndentRight' : ClassString -> Html msg -glyphiconIndentRight' c = span' {class = "glyphicon glyphicon-indent-right " ++ c} [] -{-| glyphiconIndentRight_ -} +glyphiconIndentLeft_ = + glyphiconIndentLeft_ "" + + +{-| glyphiconIndentRight' +-} +glyphiconIndentRight_ : ClassString -> Html msg +glyphiconIndentRight_ c = + span_ { class = "glyphicon glyphicon-indent-right " ++ c } [] + + +{-| glyphiconIndentRight_ +-} glyphiconIndentRight_ : Html msg -glyphiconIndentRight_ = glyphiconIndentRight' "" -{-| glyphiconFacetimeVideo' -} -glyphiconFacetimeVideo' : ClassString -> Html msg -glyphiconFacetimeVideo' c = span' {class = "glyphicon glyphicon-facetime-video " ++ c} [] -{-| glyphiconFacetimeVideo_ -} +glyphiconIndentRight_ = + glyphiconIndentRight_ "" + + +{-| glyphiconFacetimeVideo' +-} +glyphiconFacetimeVideo_ : ClassString -> Html msg +glyphiconFacetimeVideo_ c = + span_ { class = "glyphicon glyphicon-facetime-video " ++ c } [] + + +{-| glyphiconFacetimeVideo_ +-} glyphiconFacetimeVideo_ : Html msg -glyphiconFacetimeVideo_ = glyphiconFacetimeVideo' "" -{-| glyphiconPicture' -} -glyphiconPicture' : ClassString -> Html msg -glyphiconPicture' c = span' {class = "glyphicon glyphicon-picture " ++ c} [] -{-| glyphiconPicture_ -} +glyphiconFacetimeVideo_ = + glyphiconFacetimeVideo_ "" + + +{-| glyphiconPicture' +-} +glyphiconPicture_ : ClassString -> Html msg +glyphiconPicture_ c = + span_ { class = "glyphicon glyphicon-picture " ++ c } [] + + +{-| glyphiconPicture_ +-} glyphiconPicture_ : Html msg -glyphiconPicture_ = glyphiconPicture' "" -{-| glyphiconMapMarker' -} -glyphiconMapMarker' : ClassString -> Html msg -glyphiconMapMarker' c = span' {class = "glyphicon glyphicon-map-marker " ++ c} [] -{-| glyphiconMapMarker_ -} +glyphiconPicture_ = + glyphiconPicture_ "" + + +{-| glyphiconMapMarker' +-} +glyphiconMapMarker_ : ClassString -> Html msg +glyphiconMapMarker_ c = + span_ { class = "glyphicon glyphicon-map-marker " ++ c } [] + + +{-| glyphiconMapMarker_ +-} glyphiconMapMarker_ : Html msg -glyphiconMapMarker_ = glyphiconMapMarker' "" -{-| glyphiconAdjust' -} -glyphiconAdjust' : ClassString -> Html msg -glyphiconAdjust' c = span' {class = "glyphicon glyphicon-adjust " ++ c} [] -{-| glyphiconAdjust_ -} +glyphiconMapMarker_ = + glyphiconMapMarker_ "" + + +{-| glyphiconAdjust' +-} +glyphiconAdjust_ : ClassString -> Html msg +glyphiconAdjust_ c = + span_ { class = "glyphicon glyphicon-adjust " ++ c } [] + + +{-| glyphiconAdjust_ +-} glyphiconAdjust_ : Html msg -glyphiconAdjust_ = glyphiconAdjust' "" -{-| glyphiconTint' -} -glyphiconTint' : ClassString -> Html msg -glyphiconTint' c = span' {class = "glyphicon glyphicon-tint " ++ c} [] -{-| glyphiconTint_ -} +glyphiconAdjust_ = + glyphiconAdjust_ "" + + +{-| glyphiconTint' +-} +glyphiconTint_ : ClassString -> Html msg +glyphiconTint_ c = + span_ { class = "glyphicon glyphicon-tint " ++ c } [] + + +{-| glyphiconTint_ +-} glyphiconTint_ : Html msg -glyphiconTint_ = glyphiconTint' "" -{-| glyphiconEdit' -} -glyphiconEdit' : ClassString -> Html msg -glyphiconEdit' c = span' {class = "glyphicon glyphicon-edit " ++ c} [] -{-| glyphiconEdit_ -} +glyphiconTint_ = + glyphiconTint_ "" + + +{-| glyphiconEdit' +-} +glyphiconEdit_ : ClassString -> Html msg +glyphiconEdit_ c = + span_ { class = "glyphicon glyphicon-edit " ++ c } [] + + +{-| glyphiconEdit_ +-} glyphiconEdit_ : Html msg -glyphiconEdit_ = glyphiconEdit' "" -{-| glyphiconShare' -} -glyphiconShare' : ClassString -> Html msg -glyphiconShare' c = span' {class = "glyphicon glyphicon-share " ++ c} [] -{-| glyphiconShare_ -} +glyphiconEdit_ = + glyphiconEdit_ "" + + +{-| glyphiconShare' +-} +glyphiconShare_ : ClassString -> Html msg +glyphiconShare_ c = + span_ { class = "glyphicon glyphicon-share " ++ c } [] + + +{-| glyphiconShare_ +-} glyphiconShare_ : Html msg -glyphiconShare_ = glyphiconShare' "" -{-| glyphiconCheck' -} -glyphiconCheck' : ClassString -> Html msg -glyphiconCheck' c = span' {class = "glyphicon glyphicon-check " ++ c} [] -{-| glyphiconCheck_ -} +glyphiconShare_ = + glyphiconShare_ "" + + +{-| glyphiconCheck' +-} +glyphiconCheck_ : ClassString -> Html msg +glyphiconCheck_ c = + span_ { class = "glyphicon glyphicon-check " ++ c } [] + + +{-| glyphiconCheck_ +-} glyphiconCheck_ : Html msg -glyphiconCheck_ = glyphiconCheck' "" -{-| glyphiconMove' -} -glyphiconMove' : ClassString -> Html msg -glyphiconMove' c = span' {class = "glyphicon glyphicon-move " ++ c} [] -{-| glyphiconMove_ -} +glyphiconCheck_ = + glyphiconCheck_ "" + + +{-| glyphiconMove' +-} +glyphiconMove_ : ClassString -> Html msg +glyphiconMove_ c = + span_ { class = "glyphicon glyphicon-move " ++ c } [] + + +{-| glyphiconMove_ +-} glyphiconMove_ : Html msg -glyphiconMove_ = glyphiconMove' "" -{-| glyphiconStepBackward' -} -glyphiconStepBackward' : ClassString -> Html msg -glyphiconStepBackward' c = span' {class = "glyphicon glyphicon-step-backward " ++ c} [] -{-| glyphiconStepBackward_ -} +glyphiconMove_ = + glyphiconMove_ "" + + +{-| glyphiconStepBackward' +-} +glyphiconStepBackward_ : ClassString -> Html msg +glyphiconStepBackward_ c = + span_ { class = "glyphicon glyphicon-step-backward " ++ c } [] + + +{-| glyphiconStepBackward_ +-} glyphiconStepBackward_ : Html msg -glyphiconStepBackward_ = glyphiconStepBackward' "" -{-| glyphiconFastBackward' -} -glyphiconFastBackward' : ClassString -> Html msg -glyphiconFastBackward' c = span' {class = "glyphicon glyphicon-fast-backward " ++ c} [] -{-| glyphiconFastBackward_ -} +glyphiconStepBackward_ = + glyphiconStepBackward_ "" + + +{-| glyphiconFastBackward' +-} +glyphiconFastBackward_ : ClassString -> Html msg +glyphiconFastBackward_ c = + span_ { class = "glyphicon glyphicon-fast-backward " ++ c } [] + + +{-| glyphiconFastBackward_ +-} glyphiconFastBackward_ : Html msg -glyphiconFastBackward_ = glyphiconFastBackward' "" -{-| glyphiconBackward' -} -glyphiconBackward' : ClassString -> Html msg -glyphiconBackward' c = span' {class = "glyphicon glyphicon-backward " ++ c} [] -{-| glyphiconBackward_ -} +glyphiconFastBackward_ = + glyphiconFastBackward_ "" + + +{-| glyphiconBackward' +-} +glyphiconBackward_ : ClassString -> Html msg +glyphiconBackward_ c = + span_ { class = "glyphicon glyphicon-backward " ++ c } [] + + +{-| glyphiconBackward_ +-} glyphiconBackward_ : Html msg -glyphiconBackward_ = glyphiconBackward' "" -{-| glyphiconPlay' -} -glyphiconPlay' : ClassString -> Html msg -glyphiconPlay' c = span' {class = "glyphicon glyphicon-play " ++ c} [] -{-| glyphiconPlay_ -} +glyphiconBackward_ = + glyphiconBackward_ "" + + +{-| glyphiconPlay' +-} +glyphiconPlay_ : ClassString -> Html msg +glyphiconPlay_ c = + span_ { class = "glyphicon glyphicon-play " ++ c } [] + + +{-| glyphiconPlay_ +-} glyphiconPlay_ : Html msg -glyphiconPlay_ = glyphiconPlay' "" -{-| glyphiconPause' -} -glyphiconPause' : ClassString -> Html msg -glyphiconPause' c = span' {class = "glyphicon glyphicon-pause " ++ c} [] -{-| glyphiconPause_ -} +glyphiconPlay_ = + glyphiconPlay_ "" + + +{-| glyphiconPause' +-} +glyphiconPause_ : ClassString -> Html msg +glyphiconPause_ c = + span_ { class = "glyphicon glyphicon-pause " ++ c } [] + + +{-| glyphiconPause_ +-} glyphiconPause_ : Html msg -glyphiconPause_ = glyphiconPause' "" -{-| glyphiconStop' -} -glyphiconStop' : ClassString -> Html msg -glyphiconStop' c = span' {class = "glyphicon glyphicon-stop " ++ c} [] -{-| glyphiconStop_ -} +glyphiconPause_ = + glyphiconPause_ "" + + +{-| glyphiconStop' +-} +glyphiconStop_ : ClassString -> Html msg +glyphiconStop_ c = + span_ { class = "glyphicon glyphicon-stop " ++ c } [] + + +{-| glyphiconStop_ +-} glyphiconStop_ : Html msg -glyphiconStop_ = glyphiconStop' "" -{-| glyphiconForward' -} -glyphiconForward' : ClassString -> Html msg -glyphiconForward' c = span' {class = "glyphicon glyphicon-forward " ++ c} [] -{-| glyphiconForward_ -} +glyphiconStop_ = + glyphiconStop_ "" + + +{-| glyphiconForward' +-} +glyphiconForward_ : ClassString -> Html msg +glyphiconForward_ c = + span_ { class = "glyphicon glyphicon-forward " ++ c } [] + + +{-| glyphiconForward_ +-} glyphiconForward_ : Html msg -glyphiconForward_ = glyphiconForward' "" -{-| glyphiconFastForward' -} -glyphiconFastForward' : ClassString -> Html msg -glyphiconFastForward' c = span' {class = "glyphicon glyphicon-fast-forward " ++ c} [] -{-| glyphiconFastForward_ -} +glyphiconForward_ = + glyphiconForward_ "" + + +{-| glyphiconFastForward' +-} +glyphiconFastForward_ : ClassString -> Html msg +glyphiconFastForward_ c = + span_ { class = "glyphicon glyphicon-fast-forward " ++ c } [] + + +{-| glyphiconFastForward_ +-} glyphiconFastForward_ : Html msg -glyphiconFastForward_ = glyphiconFastForward' "" -{-| glyphiconStepForward' -} -glyphiconStepForward' : ClassString -> Html msg -glyphiconStepForward' c = span' {class = "glyphicon glyphicon-step-forward " ++ c} [] -{-| glyphiconStepForward_ -} +glyphiconFastForward_ = + glyphiconFastForward_ "" + + +{-| glyphiconStepForward' +-} +glyphiconStepForward_ : ClassString -> Html msg +glyphiconStepForward_ c = + span_ { class = "glyphicon glyphicon-step-forward " ++ c } [] + + +{-| glyphiconStepForward_ +-} glyphiconStepForward_ : Html msg -glyphiconStepForward_ = glyphiconStepForward' "" -{-| glyphiconEject' -} -glyphiconEject' : ClassString -> Html msg -glyphiconEject' c = span' {class = "glyphicon glyphicon-eject " ++ c} [] -{-| glyphiconEject_ -} +glyphiconStepForward_ = + glyphiconStepForward_ "" + + +{-| glyphiconEject' +-} +glyphiconEject_ : ClassString -> Html msg +glyphiconEject_ c = + span_ { class = "glyphicon glyphicon-eject " ++ c } [] + + +{-| glyphiconEject_ +-} glyphiconEject_ : Html msg -glyphiconEject_ = glyphiconEject' "" -{-| glyphiconChevronLeft' -} -glyphiconChevronLeft' : ClassString -> Html msg -glyphiconChevronLeft' c = span' {class = "glyphicon glyphicon-chevron-left " ++ c} [] -{-| glyphiconChevronLeft_ -} +glyphiconEject_ = + glyphiconEject_ "" + + +{-| glyphiconChevronLeft' +-} +glyphiconChevronLeft_ : ClassString -> Html msg +glyphiconChevronLeft_ c = + span_ { class = "glyphicon glyphicon-chevron-left " ++ c } [] + + +{-| glyphiconChevronLeft_ +-} glyphiconChevronLeft_ : Html msg -glyphiconChevronLeft_ = glyphiconChevronLeft' "" -{-| glyphiconChevronRight' -} -glyphiconChevronRight' : ClassString -> Html msg -glyphiconChevronRight' c = span' {class = "glyphicon glyphicon-chevron-right " ++ c} [] -{-| glyphiconChevronRight_ -} +glyphiconChevronLeft_ = + glyphiconChevronLeft_ "" + + +{-| glyphiconChevronRight' +-} +glyphiconChevronRight_ : ClassString -> Html msg +glyphiconChevronRight_ c = + span_ { class = "glyphicon glyphicon-chevron-right " ++ c } [] + + +{-| glyphiconChevronRight_ +-} glyphiconChevronRight_ : Html msg -glyphiconChevronRight_ = glyphiconChevronRight' "" -{-| glyphiconPlusSign' -} -glyphiconPlusSign' : ClassString -> Html msg -glyphiconPlusSign' c = span' {class = "glyphicon glyphicon-plus-sign " ++ c} [] -{-| glyphiconPlusSign_ -} +glyphiconChevronRight_ = + glyphiconChevronRight_ "" + + +{-| glyphiconPlusSign' +-} +glyphiconPlusSign_ : ClassString -> Html msg +glyphiconPlusSign_ c = + span_ { class = "glyphicon glyphicon-plus-sign " ++ c } [] + + +{-| glyphiconPlusSign_ +-} glyphiconPlusSign_ : Html msg -glyphiconPlusSign_ = glyphiconPlusSign' "" -{-| glyphiconMinusSign' -} -glyphiconMinusSign' : ClassString -> Html msg -glyphiconMinusSign' c = span' {class = "glyphicon glyphicon-minus-sign " ++ c} [] -{-| glyphiconMinusSign_ -} +glyphiconPlusSign_ = + glyphiconPlusSign_ "" + + +{-| glyphiconMinusSign' +-} +glyphiconMinusSign_ : ClassString -> Html msg +glyphiconMinusSign_ c = + span_ { class = "glyphicon glyphicon-minus-sign " ++ c } [] + + +{-| glyphiconMinusSign_ +-} glyphiconMinusSign_ : Html msg -glyphiconMinusSign_ = glyphiconMinusSign' "" -{-| glyphiconRemoveSign' -} -glyphiconRemoveSign' : ClassString -> Html msg -glyphiconRemoveSign' c = span' {class = "glyphicon glyphicon-remove-sign " ++ c} [] -{-| glyphiconRemoveSign_ -} +glyphiconMinusSign_ = + glyphiconMinusSign_ "" + + +{-| glyphiconRemoveSign' +-} +glyphiconRemoveSign_ : ClassString -> Html msg +glyphiconRemoveSign_ c = + span_ { class = "glyphicon glyphicon-remove-sign " ++ c } [] + + +{-| glyphiconRemoveSign_ +-} glyphiconRemoveSign_ : Html msg -glyphiconRemoveSign_ = glyphiconRemoveSign' "" -{-| glyphiconOkSign' -} -glyphiconOkSign' : ClassString -> Html msg -glyphiconOkSign' c = span' {class = "glyphicon glyphicon-ok-sign " ++ c} [] -{-| glyphiconOkSign_ -} +glyphiconRemoveSign_ = + glyphiconRemoveSign_ "" + + +{-| glyphiconOkSign' +-} +glyphiconOkSign_ : ClassString -> Html msg +glyphiconOkSign_ c = + span_ { class = "glyphicon glyphicon-ok-sign " ++ c } [] + + +{-| glyphiconOkSign_ +-} glyphiconOkSign_ : Html msg -glyphiconOkSign_ = glyphiconOkSign' "" -{-| glyphiconQuestionSign' -} -glyphiconQuestionSign' : ClassString -> Html msg -glyphiconQuestionSign' c = span' {class = "glyphicon glyphicon-question-sign " ++ c} [] -{-| glyphiconQuestionSign_ -} +glyphiconOkSign_ = + glyphiconOkSign_ "" + + +{-| glyphiconQuestionSign' +-} +glyphiconQuestionSign_ : ClassString -> Html msg +glyphiconQuestionSign_ c = + span_ { class = "glyphicon glyphicon-question-sign " ++ c } [] + + +{-| glyphiconQuestionSign_ +-} glyphiconQuestionSign_ : Html msg -glyphiconQuestionSign_ = glyphiconQuestionSign' "" -{-| glyphiconInfoSign' -} -glyphiconInfoSign' : ClassString -> Html msg -glyphiconInfoSign' c = span' {class = "glyphicon glyphicon-info-sign " ++ c} [] -{-| glyphiconInfoSign_ -} +glyphiconQuestionSign_ = + glyphiconQuestionSign_ "" + + +{-| glyphiconInfoSign' +-} +glyphiconInfoSign_ : ClassString -> Html msg +glyphiconInfoSign_ c = + span_ { class = "glyphicon glyphicon-info-sign " ++ c } [] + + +{-| glyphiconInfoSign_ +-} glyphiconInfoSign_ : Html msg -glyphiconInfoSign_ = glyphiconInfoSign' "" -{-| glyphiconScreenshot' -} -glyphiconScreenshot' : ClassString -> Html msg -glyphiconScreenshot' c = span' {class = "glyphicon glyphicon-screenshot " ++ c} [] -{-| glyphiconScreenshot_ -} +glyphiconInfoSign_ = + glyphiconInfoSign_ "" + + +{-| glyphiconScreenshot' +-} +glyphiconScreenshot_ : ClassString -> Html msg +glyphiconScreenshot_ c = + span_ { class = "glyphicon glyphicon-screenshot " ++ c } [] + + +{-| glyphiconScreenshot_ +-} glyphiconScreenshot_ : Html msg -glyphiconScreenshot_ = glyphiconScreenshot' "" -{-| glyphiconRemoveCircle' -} -glyphiconRemoveCircle' : ClassString -> Html msg -glyphiconRemoveCircle' c = span' {class = "glyphicon glyphicon-remove-circle " ++ c} [] -{-| glyphiconRemoveCircle_ -} +glyphiconScreenshot_ = + glyphiconScreenshot_ "" + + +{-| glyphiconRemoveCircle' +-} +glyphiconRemoveCircle_ : ClassString -> Html msg +glyphiconRemoveCircle_ c = + span_ { class = "glyphicon glyphicon-remove-circle " ++ c } [] + + +{-| glyphiconRemoveCircle_ +-} glyphiconRemoveCircle_ : Html msg -glyphiconRemoveCircle_ = glyphiconRemoveCircle' "" -{-| glyphiconOkCircle' -} -glyphiconOkCircle' : ClassString -> Html msg -glyphiconOkCircle' c = span' {class = "glyphicon glyphicon-ok-circle " ++ c} [] -{-| glyphiconOkCircle_ -} +glyphiconRemoveCircle_ = + glyphiconRemoveCircle_ "" + + +{-| glyphiconOkCircle' +-} +glyphiconOkCircle_ : ClassString -> Html msg +glyphiconOkCircle_ c = + span_ { class = "glyphicon glyphicon-ok-circle " ++ c } [] + + +{-| glyphiconOkCircle_ +-} glyphiconOkCircle_ : Html msg -glyphiconOkCircle_ = glyphiconOkCircle' "" -{-| glyphiconBanCircle' -} -glyphiconBanCircle' : ClassString -> Html msg -glyphiconBanCircle' c = span' {class = "glyphicon glyphicon-ban-circle " ++ c} [] -{-| glyphiconBanCircle_ -} +glyphiconOkCircle_ = + glyphiconOkCircle_ "" + + +{-| glyphiconBanCircle' +-} +glyphiconBanCircle_ : ClassString -> Html msg +glyphiconBanCircle_ c = + span_ { class = "glyphicon glyphicon-ban-circle " ++ c } [] + + +{-| glyphiconBanCircle_ +-} glyphiconBanCircle_ : Html msg -glyphiconBanCircle_ = glyphiconBanCircle' "" -{-| glyphiconArrowLeft' -} -glyphiconArrowLeft' : ClassString -> Html msg -glyphiconArrowLeft' c = span' {class = "glyphicon glyphicon-arrow-left " ++ c} [] -{-| glyphiconArrowLeft_ -} +glyphiconBanCircle_ = + glyphiconBanCircle_ "" + + +{-| glyphiconArrowLeft' +-} +glyphiconArrowLeft_ : ClassString -> Html msg +glyphiconArrowLeft_ c = + span_ { class = "glyphicon glyphicon-arrow-left " ++ c } [] + + +{-| glyphiconArrowLeft_ +-} glyphiconArrowLeft_ : Html msg -glyphiconArrowLeft_ = glyphiconArrowLeft' "" -{-| glyphiconArrowRight' -} -glyphiconArrowRight' : ClassString -> Html msg -glyphiconArrowRight' c = span' {class = "glyphicon glyphicon-arrow-right " ++ c} [] -{-| glyphiconArrowRight_ -} +glyphiconArrowLeft_ = + glyphiconArrowLeft_ "" + + +{-| glyphiconArrowRight' +-} +glyphiconArrowRight_ : ClassString -> Html msg +glyphiconArrowRight_ c = + span_ { class = "glyphicon glyphicon-arrow-right " ++ c } [] + + +{-| glyphiconArrowRight_ +-} glyphiconArrowRight_ : Html msg -glyphiconArrowRight_ = glyphiconArrowRight' "" -{-| glyphiconArrowUp' -} -glyphiconArrowUp' : ClassString -> Html msg -glyphiconArrowUp' c = span' {class = "glyphicon glyphicon-arrow-up " ++ c} [] -{-| glyphiconArrowUp_ -} +glyphiconArrowRight_ = + glyphiconArrowRight_ "" + + +{-| glyphiconArrowUp' +-} +glyphiconArrowUp_ : ClassString -> Html msg +glyphiconArrowUp_ c = + span_ { class = "glyphicon glyphicon-arrow-up " ++ c } [] + + +{-| glyphiconArrowUp_ +-} glyphiconArrowUp_ : Html msg -glyphiconArrowUp_ = glyphiconArrowUp' "" -{-| glyphiconArrowDown' -} -glyphiconArrowDown' : ClassString -> Html msg -glyphiconArrowDown' c = span' {class = "glyphicon glyphicon-arrow-down " ++ c} [] -{-| glyphiconArrowDown_ -} +glyphiconArrowUp_ = + glyphiconArrowUp_ "" + + +{-| glyphiconArrowDown' +-} +glyphiconArrowDown_ : ClassString -> Html msg +glyphiconArrowDown_ c = + span_ { class = "glyphicon glyphicon-arrow-down " ++ c } [] + + +{-| glyphiconArrowDown_ +-} glyphiconArrowDown_ : Html msg -glyphiconArrowDown_ = glyphiconArrowDown' "" -{-| glyphiconShareAlt' -} -glyphiconShareAlt' : ClassString -> Html msg -glyphiconShareAlt' c = span' {class = "glyphicon glyphicon-share-alt " ++ c} [] -{-| glyphiconShareAlt_ -} +glyphiconArrowDown_ = + glyphiconArrowDown_ "" + + +{-| glyphiconShareAlt' +-} +glyphiconShareAlt_ : ClassString -> Html msg +glyphiconShareAlt_ c = + span_ { class = "glyphicon glyphicon-share-alt " ++ c } [] + + +{-| glyphiconShareAlt_ +-} glyphiconShareAlt_ : Html msg -glyphiconShareAlt_ = glyphiconShareAlt' "" -{-| glyphiconResizeFull' -} -glyphiconResizeFull' : ClassString -> Html msg -glyphiconResizeFull' c = span' {class = "glyphicon glyphicon-resize-full " ++ c} [] -{-| glyphiconResizeFull_ -} +glyphiconShareAlt_ = + glyphiconShareAlt_ "" + + +{-| glyphiconResizeFull' +-} +glyphiconResizeFull_ : ClassString -> Html msg +glyphiconResizeFull_ c = + span_ { class = "glyphicon glyphicon-resize-full " ++ c } [] + + +{-| glyphiconResizeFull_ +-} glyphiconResizeFull_ : Html msg -glyphiconResizeFull_ = glyphiconResizeFull' "" -{-| glyphiconResizeSmall' -} -glyphiconResizeSmall' : ClassString -> Html msg -glyphiconResizeSmall' c = span' {class = "glyphicon glyphicon-resize-small " ++ c} [] -{-| glyphiconResizeSmall_ -} +glyphiconResizeFull_ = + glyphiconResizeFull_ "" + + +{-| glyphiconResizeSmall' +-} +glyphiconResizeSmall_ : ClassString -> Html msg +glyphiconResizeSmall_ c = + span_ { class = "glyphicon glyphicon-resize-small " ++ c } [] + + +{-| glyphiconResizeSmall_ +-} glyphiconResizeSmall_ : Html msg -glyphiconResizeSmall_ = glyphiconResizeSmall' "" -{-| glyphiconExclamationSign' -} -glyphiconExclamationSign' : ClassString -> Html msg -glyphiconExclamationSign' c = span' {class = "glyphicon glyphicon-exclamation-sign " ++ c} [] -{-| glyphiconExclamationSign_ -} +glyphiconResizeSmall_ = + glyphiconResizeSmall_ "" + + +{-| glyphiconExclamationSign' +-} +glyphiconExclamationSign_ : ClassString -> Html msg +glyphiconExclamationSign_ c = + span_ { class = "glyphicon glyphicon-exclamation-sign " ++ c } [] + + +{-| glyphiconExclamationSign_ +-} glyphiconExclamationSign_ : Html msg -glyphiconExclamationSign_ = glyphiconExclamationSign' "" -{-| glyphiconGift' -} -glyphiconGift' : ClassString -> Html msg -glyphiconGift' c = span' {class = "glyphicon glyphicon-gift " ++ c} [] -{-| glyphiconGift_ -} +glyphiconExclamationSign_ = + glyphiconExclamationSign_ "" + + +{-| glyphiconGift' +-} +glyphiconGift_ : ClassString -> Html msg +glyphiconGift_ c = + span_ { class = "glyphicon glyphicon-gift " ++ c } [] + + +{-| glyphiconGift_ +-} glyphiconGift_ : Html msg -glyphiconGift_ = glyphiconGift' "" -{-| glyphiconLeaf' -} -glyphiconLeaf' : ClassString -> Html msg -glyphiconLeaf' c = span' {class = "glyphicon glyphicon-leaf " ++ c} [] -{-| glyphiconLeaf_ -} +glyphiconGift_ = + glyphiconGift_ "" + + +{-| glyphiconLeaf' +-} +glyphiconLeaf_ : ClassString -> Html msg +glyphiconLeaf_ c = + span_ { class = "glyphicon glyphicon-leaf " ++ c } [] + + +{-| glyphiconLeaf_ +-} glyphiconLeaf_ : Html msg -glyphiconLeaf_ = glyphiconLeaf' "" -{-| glyphiconFire' -} -glyphiconFire' : ClassString -> Html msg -glyphiconFire' c = span' {class = "glyphicon glyphicon-fire " ++ c} [] -{-| glyphiconFire_ -} +glyphiconLeaf_ = + glyphiconLeaf_ "" + + +{-| glyphiconFire' +-} +glyphiconFire_ : ClassString -> Html msg +glyphiconFire_ c = + span_ { class = "glyphicon glyphicon-fire " ++ c } [] + + +{-| glyphiconFire_ +-} glyphiconFire_ : Html msg -glyphiconFire_ = glyphiconFire' "" -{-| glyphiconEyeOpen' -} -glyphiconEyeOpen' : ClassString -> Html msg -glyphiconEyeOpen' c = span' {class = "glyphicon glyphicon-eye-open " ++ c} [] -{-| glyphiconEyeOpen_ -} +glyphiconFire_ = + glyphiconFire_ "" + + +{-| glyphiconEyeOpen' +-} +glyphiconEyeOpen_ : ClassString -> Html msg +glyphiconEyeOpen_ c = + span_ { class = "glyphicon glyphicon-eye-open " ++ c } [] + + +{-| glyphiconEyeOpen_ +-} glyphiconEyeOpen_ : Html msg -glyphiconEyeOpen_ = glyphiconEyeOpen' "" -{-| glyphiconEyeClose' -} -glyphiconEyeClose' : ClassString -> Html msg -glyphiconEyeClose' c = span' {class = "glyphicon glyphicon-eye-close " ++ c} [] -{-| glyphiconEyeClose_ -} +glyphiconEyeOpen_ = + glyphiconEyeOpen_ "" + + +{-| glyphiconEyeClose' +-} +glyphiconEyeClose_ : ClassString -> Html msg +glyphiconEyeClose_ c = + span_ { class = "glyphicon glyphicon-eye-close " ++ c } [] + + +{-| glyphiconEyeClose_ +-} glyphiconEyeClose_ : Html msg -glyphiconEyeClose_ = glyphiconEyeClose' "" -{-| glyphiconWarningSign' -} -glyphiconWarningSign' : ClassString -> Html msg -glyphiconWarningSign' c = span' {class = "glyphicon glyphicon-warning-sign " ++ c} [] -{-| glyphiconWarningSign_ -} +glyphiconEyeClose_ = + glyphiconEyeClose_ "" + + +{-| glyphiconWarningSign' +-} +glyphiconWarningSign_ : ClassString -> Html msg +glyphiconWarningSign_ c = + span_ { class = "glyphicon glyphicon-warning-sign " ++ c } [] + + +{-| glyphiconWarningSign_ +-} glyphiconWarningSign_ : Html msg -glyphiconWarningSign_ = glyphiconWarningSign' "" -{-| glyphiconPlane' -} -glyphiconPlane' : ClassString -> Html msg -glyphiconPlane' c = span' {class = "glyphicon glyphicon-plane " ++ c} [] -{-| glyphiconPlane_ -} +glyphiconWarningSign_ = + glyphiconWarningSign_ "" + + +{-| glyphiconPlane' +-} +glyphiconPlane_ : ClassString -> Html msg +glyphiconPlane_ c = + span_ { class = "glyphicon glyphicon-plane " ++ c } [] + + +{-| glyphiconPlane_ +-} glyphiconPlane_ : Html msg -glyphiconPlane_ = glyphiconPlane' "" -{-| glyphiconCalendar' -} -glyphiconCalendar' : ClassString -> Html msg -glyphiconCalendar' c = span' {class = "glyphicon glyphicon-calendar " ++ c} [] -{-| glyphiconCalendar_ -} +glyphiconPlane_ = + glyphiconPlane_ "" + + +{-| glyphiconCalendar' +-} +glyphiconCalendar_ : ClassString -> Html msg +glyphiconCalendar_ c = + span_ { class = "glyphicon glyphicon-calendar " ++ c } [] + + +{-| glyphiconCalendar_ +-} glyphiconCalendar_ : Html msg -glyphiconCalendar_ = glyphiconCalendar' "" -{-| glyphiconRandom' -} -glyphiconRandom' : ClassString -> Html msg -glyphiconRandom' c = span' {class = "glyphicon glyphicon-random " ++ c} [] -{-| glyphiconRandom_ -} +glyphiconCalendar_ = + glyphiconCalendar_ "" + + +{-| glyphiconRandom' +-} +glyphiconRandom_ : ClassString -> Html msg +glyphiconRandom_ c = + span_ { class = "glyphicon glyphicon-random " ++ c } [] + + +{-| glyphiconRandom_ +-} glyphiconRandom_ : Html msg -glyphiconRandom_ = glyphiconRandom' "" -{-| glyphiconComment' -} -glyphiconComment' : ClassString -> Html msg -glyphiconComment' c = span' {class = "glyphicon glyphicon-comment " ++ c} [] -{-| glyphiconComment_ -} +glyphiconRandom_ = + glyphiconRandom_ "" + + +{-| glyphiconComment' +-} +glyphiconComment_ : ClassString -> Html msg +glyphiconComment_ c = + span_ { class = "glyphicon glyphicon-comment " ++ c } [] + + +{-| glyphiconComment_ +-} glyphiconComment_ : Html msg -glyphiconComment_ = glyphiconComment' "" -{-| glyphiconMagnet' -} -glyphiconMagnet' : ClassString -> Html msg -glyphiconMagnet' c = span' {class = "glyphicon glyphicon-magnet " ++ c} [] -{-| glyphiconMagnet_ -} +glyphiconComment_ = + glyphiconComment_ "" + + +{-| glyphiconMagnet' +-} +glyphiconMagnet_ : ClassString -> Html msg +glyphiconMagnet_ c = + span_ { class = "glyphicon glyphicon-magnet " ++ c } [] + + +{-| glyphiconMagnet_ +-} glyphiconMagnet_ : Html msg -glyphiconMagnet_ = glyphiconMagnet' "" -{-| glyphiconChevronUp' -} -glyphiconChevronUp' : ClassString -> Html msg -glyphiconChevronUp' c = span' {class = "glyphicon glyphicon-chevron-up " ++ c} [] -{-| glyphiconChevronUp_ -} +glyphiconMagnet_ = + glyphiconMagnet_ "" + + +{-| glyphiconChevronUp' +-} +glyphiconChevronUp_ : ClassString -> Html msg +glyphiconChevronUp_ c = + span_ { class = "glyphicon glyphicon-chevron-up " ++ c } [] + + +{-| glyphiconChevronUp_ +-} glyphiconChevronUp_ : Html msg -glyphiconChevronUp_ = glyphiconChevronUp' "" -{-| glyphiconChevronDown' -} -glyphiconChevronDown' : ClassString -> Html msg -glyphiconChevronDown' c = span' {class = "glyphicon glyphicon-chevron-down " ++ c} [] -{-| glyphiconChevronDown_ -} +glyphiconChevronUp_ = + glyphiconChevronUp_ "" + + +{-| glyphiconChevronDown' +-} +glyphiconChevronDown_ : ClassString -> Html msg +glyphiconChevronDown_ c = + span_ { class = "glyphicon glyphicon-chevron-down " ++ c } [] + + +{-| glyphiconChevronDown_ +-} glyphiconChevronDown_ : Html msg -glyphiconChevronDown_ = glyphiconChevronDown' "" -{-| glyphiconRetweet' -} -glyphiconRetweet' : ClassString -> Html msg -glyphiconRetweet' c = span' {class = "glyphicon glyphicon-retweet " ++ c} [] -{-| glyphiconRetweet_ -} +glyphiconChevronDown_ = + glyphiconChevronDown_ "" + + +{-| glyphiconRetweet' +-} +glyphiconRetweet_ : ClassString -> Html msg +glyphiconRetweet_ c = + span_ { class = "glyphicon glyphicon-retweet " ++ c } [] + + +{-| glyphiconRetweet_ +-} glyphiconRetweet_ : Html msg -glyphiconRetweet_ = glyphiconRetweet' "" -{-| glyphiconShoppingCart' -} -glyphiconShoppingCart' : ClassString -> Html msg -glyphiconShoppingCart' c = span' {class = "glyphicon glyphicon-shopping-cart " ++ c} [] -{-| glyphiconShoppingCart_ -} +glyphiconRetweet_ = + glyphiconRetweet_ "" + + +{-| glyphiconShoppingCart' +-} +glyphiconShoppingCart_ : ClassString -> Html msg +glyphiconShoppingCart_ c = + span_ { class = "glyphicon glyphicon-shopping-cart " ++ c } [] + + +{-| glyphiconShoppingCart_ +-} glyphiconShoppingCart_ : Html msg -glyphiconShoppingCart_ = glyphiconShoppingCart' "" -{-| glyphiconFolderClose' -} -glyphiconFolderClose' : ClassString -> Html msg -glyphiconFolderClose' c = span' {class = "glyphicon glyphicon-folder-close " ++ c} [] -{-| glyphiconFolderClose_ -} +glyphiconShoppingCart_ = + glyphiconShoppingCart_ "" + + +{-| glyphiconFolderClose' +-} +glyphiconFolderClose_ : ClassString -> Html msg +glyphiconFolderClose_ c = + span_ { class = "glyphicon glyphicon-folder-close " ++ c } [] + + +{-| glyphiconFolderClose_ +-} glyphiconFolderClose_ : Html msg -glyphiconFolderClose_ = glyphiconFolderClose' "" -{-| glyphiconFolderOpen' -} -glyphiconFolderOpen' : ClassString -> Html msg -glyphiconFolderOpen' c = span' {class = "glyphicon glyphicon-folder-open " ++ c} [] -{-| glyphiconFolderOpen_ -} +glyphiconFolderClose_ = + glyphiconFolderClose_ "" + + +{-| glyphiconFolderOpen' +-} +glyphiconFolderOpen_ : ClassString -> Html msg +glyphiconFolderOpen_ c = + span_ { class = "glyphicon glyphicon-folder-open " ++ c } [] + + +{-| glyphiconFolderOpen_ +-} glyphiconFolderOpen_ : Html msg -glyphiconFolderOpen_ = glyphiconFolderOpen' "" -{-| glyphiconResizeVertical' -} -glyphiconResizeVertical' : ClassString -> Html msg -glyphiconResizeVertical' c = span' {class = "glyphicon glyphicon-resize-vertical " ++ c} [] -{-| glyphiconResizeVertical_ -} +glyphiconFolderOpen_ = + glyphiconFolderOpen_ "" + + +{-| glyphiconResizeVertical' +-} +glyphiconResizeVertical_ : ClassString -> Html msg +glyphiconResizeVertical_ c = + span_ { class = "glyphicon glyphicon-resize-vertical " ++ c } [] + + +{-| glyphiconResizeVertical_ +-} glyphiconResizeVertical_ : Html msg -glyphiconResizeVertical_ = glyphiconResizeVertical' "" -{-| glyphiconResizeHorizontal' -} -glyphiconResizeHorizontal' : ClassString -> Html msg -glyphiconResizeHorizontal' c = span' {class = "glyphicon glyphicon-resize-horizontal " ++ c} [] -{-| glyphiconResizeHorizontal_ -} +glyphiconResizeVertical_ = + glyphiconResizeVertical_ "" + + +{-| glyphiconResizeHorizontal' +-} +glyphiconResizeHorizontal_ : ClassString -> Html msg +glyphiconResizeHorizontal_ c = + span_ { class = "glyphicon glyphicon-resize-horizontal " ++ c } [] + + +{-| glyphiconResizeHorizontal_ +-} glyphiconResizeHorizontal_ : Html msg -glyphiconResizeHorizontal_ = glyphiconResizeHorizontal' "" -{-| glyphiconHdd' -} -glyphiconHdd' : ClassString -> Html msg -glyphiconHdd' c = span' {class = "glyphicon glyphicon-hdd " ++ c} [] -{-| glyphiconHdd_ -} +glyphiconResizeHorizontal_ = + glyphiconResizeHorizontal_ "" + + +{-| glyphiconHdd' +-} +glyphiconHdd_ : ClassString -> Html msg +glyphiconHdd_ c = + span_ { class = "glyphicon glyphicon-hdd " ++ c } [] + + +{-| glyphiconHdd_ +-} glyphiconHdd_ : Html msg -glyphiconHdd_ = glyphiconHdd' "" -{-| glyphiconBullhorn' -} -glyphiconBullhorn' : ClassString -> Html msg -glyphiconBullhorn' c = span' {class = "glyphicon glyphicon-bullhorn " ++ c} [] -{-| glyphiconBullhorn_ -} +glyphiconHdd_ = + glyphiconHdd_ "" + + +{-| glyphiconBullhorn' +-} +glyphiconBullhorn_ : ClassString -> Html msg +glyphiconBullhorn_ c = + span_ { class = "glyphicon glyphicon-bullhorn " ++ c } [] + + +{-| glyphiconBullhorn_ +-} glyphiconBullhorn_ : Html msg -glyphiconBullhorn_ = glyphiconBullhorn' "" -{-| glyphiconBell' -} -glyphiconBell' : ClassString -> Html msg -glyphiconBell' c = span' {class = "glyphicon glyphicon-bell " ++ c} [] -{-| glyphiconBell_ -} +glyphiconBullhorn_ = + glyphiconBullhorn_ "" + + +{-| glyphiconBell' +-} +glyphiconBell_ : ClassString -> Html msg +glyphiconBell_ c = + span_ { class = "glyphicon glyphicon-bell " ++ c } [] + + +{-| glyphiconBell_ +-} glyphiconBell_ : Html msg -glyphiconBell_ = glyphiconBell' "" -{-| glyphiconCertificate' -} -glyphiconCertificate' : ClassString -> Html msg -glyphiconCertificate' c = span' {class = "glyphicon glyphicon-certificate " ++ c} [] -{-| glyphiconCertificate_ -} +glyphiconBell_ = + glyphiconBell_ "" + + +{-| glyphiconCertificate' +-} +glyphiconCertificate_ : ClassString -> Html msg +glyphiconCertificate_ c = + span_ { class = "glyphicon glyphicon-certificate " ++ c } [] + + +{-| glyphiconCertificate_ +-} glyphiconCertificate_ : Html msg -glyphiconCertificate_ = glyphiconCertificate' "" -{-| glyphiconThumbsUp' -} -glyphiconThumbsUp' : ClassString -> Html msg -glyphiconThumbsUp' c = span' {class = "glyphicon glyphicon-thumbs-up " ++ c} [] -{-| glyphiconThumbsUp_ -} +glyphiconCertificate_ = + glyphiconCertificate_ "" + + +{-| glyphiconThumbsUp' +-} +glyphiconThumbsUp_ : ClassString -> Html msg +glyphiconThumbsUp_ c = + span_ { class = "glyphicon glyphicon-thumbs-up " ++ c } [] + + +{-| glyphiconThumbsUp_ +-} glyphiconThumbsUp_ : Html msg -glyphiconThumbsUp_ = glyphiconThumbsUp' "" -{-| glyphiconThumbsDown' -} -glyphiconThumbsDown' : ClassString -> Html msg -glyphiconThumbsDown' c = span' {class = "glyphicon glyphicon-thumbs-down " ++ c} [] -{-| glyphiconThumbsDown_ -} +glyphiconThumbsUp_ = + glyphiconThumbsUp_ "" + + +{-| glyphiconThumbsDown' +-} +glyphiconThumbsDown_ : ClassString -> Html msg +glyphiconThumbsDown_ c = + span_ { class = "glyphicon glyphicon-thumbs-down " ++ c } [] + + +{-| glyphiconThumbsDown_ +-} glyphiconThumbsDown_ : Html msg -glyphiconThumbsDown_ = glyphiconThumbsDown' "" -{-| glyphiconHandRight' -} -glyphiconHandRight' : ClassString -> Html msg -glyphiconHandRight' c = span' {class = "glyphicon glyphicon-hand-right " ++ c} [] -{-| glyphiconHandRight_ -} +glyphiconThumbsDown_ = + glyphiconThumbsDown_ "" + + +{-| glyphiconHandRight' +-} +glyphiconHandRight_ : ClassString -> Html msg +glyphiconHandRight_ c = + span_ { class = "glyphicon glyphicon-hand-right " ++ c } [] + + +{-| glyphiconHandRight_ +-} glyphiconHandRight_ : Html msg -glyphiconHandRight_ = glyphiconHandRight' "" -{-| glyphiconHandLeft' -} -glyphiconHandLeft' : ClassString -> Html msg -glyphiconHandLeft' c = span' {class = "glyphicon glyphicon-hand-left " ++ c} [] -{-| glyphiconHandLeft_ -} +glyphiconHandRight_ = + glyphiconHandRight_ "" + + +{-| glyphiconHandLeft' +-} +glyphiconHandLeft_ : ClassString -> Html msg +glyphiconHandLeft_ c = + span_ { class = "glyphicon glyphicon-hand-left " ++ c } [] + + +{-| glyphiconHandLeft_ +-} glyphiconHandLeft_ : Html msg -glyphiconHandLeft_ = glyphiconHandLeft' "" -{-| glyphiconHandUp' -} -glyphiconHandUp' : ClassString -> Html msg -glyphiconHandUp' c = span' {class = "glyphicon glyphicon-hand-up " ++ c} [] -{-| glyphiconHandUp_ -} +glyphiconHandLeft_ = + glyphiconHandLeft_ "" + + +{-| glyphiconHandUp' +-} +glyphiconHandUp_ : ClassString -> Html msg +glyphiconHandUp_ c = + span_ { class = "glyphicon glyphicon-hand-up " ++ c } [] + + +{-| glyphiconHandUp_ +-} glyphiconHandUp_ : Html msg -glyphiconHandUp_ = glyphiconHandUp' "" -{-| glyphiconHandDown' -} -glyphiconHandDown' : ClassString -> Html msg -glyphiconHandDown' c = span' {class = "glyphicon glyphicon-hand-down " ++ c} [] -{-| glyphiconHandDown_ -} +glyphiconHandUp_ = + glyphiconHandUp_ "" + + +{-| glyphiconHandDown' +-} +glyphiconHandDown_ : ClassString -> Html msg +glyphiconHandDown_ c = + span_ { class = "glyphicon glyphicon-hand-down " ++ c } [] + + +{-| glyphiconHandDown_ +-} glyphiconHandDown_ : Html msg -glyphiconHandDown_ = glyphiconHandDown' "" -{-| glyphiconCircleArrowRight' -} -glyphiconCircleArrowRight' : ClassString -> Html msg -glyphiconCircleArrowRight' c = span' {class = "glyphicon glyphicon-circle-arrow-right " ++ c} [] -{-| glyphiconCircleArrowRight_ -} +glyphiconHandDown_ = + glyphiconHandDown_ "" + + +{-| glyphiconCircleArrowRight' +-} +glyphiconCircleArrowRight_ : ClassString -> Html msg +glyphiconCircleArrowRight_ c = + span_ { class = "glyphicon glyphicon-circle-arrow-right " ++ c } [] + + +{-| glyphiconCircleArrowRight_ +-} glyphiconCircleArrowRight_ : Html msg -glyphiconCircleArrowRight_ = glyphiconCircleArrowRight' "" -{-| glyphiconCircleArrowLeft' -} -glyphiconCircleArrowLeft' : ClassString -> Html msg -glyphiconCircleArrowLeft' c = span' {class = "glyphicon glyphicon-circle-arrow-left " ++ c} [] -{-| glyphiconCircleArrowLeft_ -} +glyphiconCircleArrowRight_ = + glyphiconCircleArrowRight_ "" + + +{-| glyphiconCircleArrowLeft' +-} +glyphiconCircleArrowLeft_ : ClassString -> Html msg +glyphiconCircleArrowLeft_ c = + span_ { class = "glyphicon glyphicon-circle-arrow-left " ++ c } [] + + +{-| glyphiconCircleArrowLeft_ +-} glyphiconCircleArrowLeft_ : Html msg -glyphiconCircleArrowLeft_ = glyphiconCircleArrowLeft' "" -{-| glyphiconCircleArrowUp' -} -glyphiconCircleArrowUp' : ClassString -> Html msg -glyphiconCircleArrowUp' c = span' {class = "glyphicon glyphicon-circle-arrow-up " ++ c} [] -{-| glyphiconCircleArrowUp_ -} +glyphiconCircleArrowLeft_ = + glyphiconCircleArrowLeft_ "" + + +{-| glyphiconCircleArrowUp' +-} +glyphiconCircleArrowUp_ : ClassString -> Html msg +glyphiconCircleArrowUp_ c = + span_ { class = "glyphicon glyphicon-circle-arrow-up " ++ c } [] + + +{-| glyphiconCircleArrowUp_ +-} glyphiconCircleArrowUp_ : Html msg -glyphiconCircleArrowUp_ = glyphiconCircleArrowUp' "" -{-| glyphiconCircleArrowDown' -} -glyphiconCircleArrowDown' : ClassString -> Html msg -glyphiconCircleArrowDown' c = span' {class = "glyphicon glyphicon-circle-arrow-down " ++ c} [] -{-| glyphiconCircleArrowDown_ -} +glyphiconCircleArrowUp_ = + glyphiconCircleArrowUp_ "" + + +{-| glyphiconCircleArrowDown' +-} +glyphiconCircleArrowDown_ : ClassString -> Html msg +glyphiconCircleArrowDown_ c = + span_ { class = "glyphicon glyphicon-circle-arrow-down " ++ c } [] + + +{-| glyphiconCircleArrowDown_ +-} glyphiconCircleArrowDown_ : Html msg -glyphiconCircleArrowDown_ = glyphiconCircleArrowDown' "" -{-| glyphiconGlobe' -} -glyphiconGlobe' : ClassString -> Html msg -glyphiconGlobe' c = span' {class = "glyphicon glyphicon-globe " ++ c} [] -{-| glyphiconGlobe_ -} +glyphiconCircleArrowDown_ = + glyphiconCircleArrowDown_ "" + + +{-| glyphiconGlobe' +-} +glyphiconGlobe_ : ClassString -> Html msg +glyphiconGlobe_ c = + span_ { class = "glyphicon glyphicon-globe " ++ c } [] + + +{-| glyphiconGlobe_ +-} glyphiconGlobe_ : Html msg -glyphiconGlobe_ = glyphiconGlobe' "" -{-| glyphiconWrench' -} -glyphiconWrench' : ClassString -> Html msg -glyphiconWrench' c = span' {class = "glyphicon glyphicon-wrench " ++ c} [] -{-| glyphiconWrench_ -} +glyphiconGlobe_ = + glyphiconGlobe_ "" + + +{-| glyphiconWrench' +-} +glyphiconWrench_ : ClassString -> Html msg +glyphiconWrench_ c = + span_ { class = "glyphicon glyphicon-wrench " ++ c } [] + + +{-| glyphiconWrench_ +-} glyphiconWrench_ : Html msg -glyphiconWrench_ = glyphiconWrench' "" -{-| glyphiconTasks' -} -glyphiconTasks' : ClassString -> Html msg -glyphiconTasks' c = span' {class = "glyphicon glyphicon-tasks " ++ c} [] -{-| glyphiconTasks_ -} +glyphiconWrench_ = + glyphiconWrench_ "" + + +{-| glyphiconTasks' +-} +glyphiconTasks_ : ClassString -> Html msg +glyphiconTasks_ c = + span_ { class = "glyphicon glyphicon-tasks " ++ c } [] + + +{-| glyphiconTasks_ +-} glyphiconTasks_ : Html msg -glyphiconTasks_ = glyphiconTasks' "" -{-| glyphiconFilter' -} -glyphiconFilter' : ClassString -> Html msg -glyphiconFilter' c = span' {class = "glyphicon glyphicon-filter " ++ c} [] -{-| glyphiconFilter_ -} +glyphiconTasks_ = + glyphiconTasks_ "" + + +{-| glyphiconFilter' +-} +glyphiconFilter_ : ClassString -> Html msg +glyphiconFilter_ c = + span_ { class = "glyphicon glyphicon-filter " ++ c } [] + + +{-| glyphiconFilter_ +-} glyphiconFilter_ : Html msg -glyphiconFilter_ = glyphiconFilter' "" -{-| glyphiconBriefcase' -} -glyphiconBriefcase' : ClassString -> Html msg -glyphiconBriefcase' c = span' {class = "glyphicon glyphicon-briefcase " ++ c} [] -{-| glyphiconBriefcase_ -} +glyphiconFilter_ = + glyphiconFilter_ "" + + +{-| glyphiconBriefcase' +-} +glyphiconBriefcase_ : ClassString -> Html msg +glyphiconBriefcase_ c = + span_ { class = "glyphicon glyphicon-briefcase " ++ c } [] + + +{-| glyphiconBriefcase_ +-} glyphiconBriefcase_ : Html msg -glyphiconBriefcase_ = glyphiconBriefcase' "" -{-| glyphiconFullscreen' -} -glyphiconFullscreen' : ClassString -> Html msg -glyphiconFullscreen' c = span' {class = "glyphicon glyphicon-fullscreen " ++ c} [] -{-| glyphiconFullscreen_ -} +glyphiconBriefcase_ = + glyphiconBriefcase_ "" + + +{-| glyphiconFullscreen' +-} +glyphiconFullscreen_ : ClassString -> Html msg +glyphiconFullscreen_ c = + span_ { class = "glyphicon glyphicon-fullscreen " ++ c } [] + + +{-| glyphiconFullscreen_ +-} glyphiconFullscreen_ : Html msg -glyphiconFullscreen_ = glyphiconFullscreen' "" -{-| glyphiconDashboard' -} -glyphiconDashboard' : ClassString -> Html msg -glyphiconDashboard' c = span' {class = "glyphicon glyphicon-dashboard " ++ c} [] -{-| glyphiconDashboard_ -} +glyphiconFullscreen_ = + glyphiconFullscreen_ "" + + +{-| glyphiconDashboard' +-} +glyphiconDashboard_ : ClassString -> Html msg +glyphiconDashboard_ c = + span_ { class = "glyphicon glyphicon-dashboard " ++ c } [] + + +{-| glyphiconDashboard_ +-} glyphiconDashboard_ : Html msg -glyphiconDashboard_ = glyphiconDashboard' "" -{-| glyphiconPaperclip' -} -glyphiconPaperclip' : ClassString -> Html msg -glyphiconPaperclip' c = span' {class = "glyphicon glyphicon-paperclip " ++ c} [] -{-| glyphiconPaperclip_ -} +glyphiconDashboard_ = + glyphiconDashboard_ "" + + +{-| glyphiconPaperclip' +-} +glyphiconPaperclip_ : ClassString -> Html msg +glyphiconPaperclip_ c = + span_ { class = "glyphicon glyphicon-paperclip " ++ c } [] + + +{-| glyphiconPaperclip_ +-} glyphiconPaperclip_ : Html msg -glyphiconPaperclip_ = glyphiconPaperclip' "" -{-| glyphiconHeartEmpty' -} -glyphiconHeartEmpty' : ClassString -> Html msg -glyphiconHeartEmpty' c = span' {class = "glyphicon glyphicon-heart-empty " ++ c} [] -{-| glyphiconHeartEmpty_ -} +glyphiconPaperclip_ = + glyphiconPaperclip_ "" + + +{-| glyphiconHeartEmpty' +-} +glyphiconHeartEmpty_ : ClassString -> Html msg +glyphiconHeartEmpty_ c = + span_ { class = "glyphicon glyphicon-heart-empty " ++ c } [] + + +{-| glyphiconHeartEmpty_ +-} glyphiconHeartEmpty_ : Html msg -glyphiconHeartEmpty_ = glyphiconHeartEmpty' "" -{-| glyphiconLink' -} -glyphiconLink' : ClassString -> Html msg -glyphiconLink' c = span' {class = "glyphicon glyphicon-link " ++ c} [] -{-| glyphiconLink_ -} +glyphiconHeartEmpty_ = + glyphiconHeartEmpty_ "" + + +{-| glyphiconLink' +-} +glyphiconLink_ : ClassString -> Html msg +glyphiconLink_ c = + span_ { class = "glyphicon glyphicon-link " ++ c } [] + + +{-| glyphiconLink_ +-} glyphiconLink_ : Html msg -glyphiconLink_ = glyphiconLink' "" -{-| glyphiconPhone' -} -glyphiconPhone' : ClassString -> Html msg -glyphiconPhone' c = span' {class = "glyphicon glyphicon-phone " ++ c} [] -{-| glyphiconPhone_ -} +glyphiconLink_ = + glyphiconLink_ "" + + +{-| glyphiconPhone' +-} +glyphiconPhone_ : ClassString -> Html msg +glyphiconPhone_ c = + span_ { class = "glyphicon glyphicon-phone " ++ c } [] + + +{-| glyphiconPhone_ +-} glyphiconPhone_ : Html msg -glyphiconPhone_ = glyphiconPhone' "" -{-| glyphiconPushpin' -} -glyphiconPushpin' : ClassString -> Html msg -glyphiconPushpin' c = span' {class = "glyphicon glyphicon-pushpin " ++ c} [] -{-| glyphiconPushpin_ -} +glyphiconPhone_ = + glyphiconPhone_ "" + + +{-| glyphiconPushpin' +-} +glyphiconPushpin_ : ClassString -> Html msg +glyphiconPushpin_ c = + span_ { class = "glyphicon glyphicon-pushpin " ++ c } [] + + +{-| glyphiconPushpin_ +-} glyphiconPushpin_ : Html msg -glyphiconPushpin_ = glyphiconPushpin' "" -{-| glyphiconUsd' -} -glyphiconUsd' : ClassString -> Html msg -glyphiconUsd' c = span' {class = "glyphicon glyphicon-usd " ++ c} [] -{-| glyphiconUsd_ -} +glyphiconPushpin_ = + glyphiconPushpin_ "" + + +{-| glyphiconUsd' +-} +glyphiconUsd_ : ClassString -> Html msg +glyphiconUsd_ c = + span_ { class = "glyphicon glyphicon-usd " ++ c } [] + + +{-| glyphiconUsd_ +-} glyphiconUsd_ : Html msg -glyphiconUsd_ = glyphiconUsd' "" -{-| glyphiconGbp' -} -glyphiconGbp' : ClassString -> Html msg -glyphiconGbp' c = span' {class = "glyphicon glyphicon-gbp " ++ c} [] -{-| glyphiconGbp_ -} +glyphiconUsd_ = + glyphiconUsd_ "" + + +{-| glyphiconGbp' +-} +glyphiconGbp_ : ClassString -> Html msg +glyphiconGbp_ c = + span_ { class = "glyphicon glyphicon-gbp " ++ c } [] + + +{-| glyphiconGbp_ +-} glyphiconGbp_ : Html msg -glyphiconGbp_ = glyphiconGbp' "" -{-| glyphiconSort' -} -glyphiconSort' : ClassString -> Html msg -glyphiconSort' c = span' {class = "glyphicon glyphicon-sort " ++ c} [] -{-| glyphiconSort_ -} +glyphiconGbp_ = + glyphiconGbp_ "" + + +{-| glyphiconSort' +-} +glyphiconSort_ : ClassString -> Html msg +glyphiconSort_ c = + span_ { class = "glyphicon glyphicon-sort " ++ c } [] + + +{-| glyphiconSort_ +-} glyphiconSort_ : Html msg -glyphiconSort_ = glyphiconSort' "" -{-| glyphiconSortByAlphabet' -} -glyphiconSortByAlphabet' : ClassString -> Html msg -glyphiconSortByAlphabet' c = span' {class = "glyphicon glyphicon-sort-by-alphabet " ++ c} [] -{-| glyphiconSortByAlphabet_ -} +glyphiconSort_ = + glyphiconSort_ "" + + +{-| glyphiconSortByAlphabet' +-} +glyphiconSortByAlphabet_ : ClassString -> Html msg +glyphiconSortByAlphabet_ c = + span_ { class = "glyphicon glyphicon-sort-by-alphabet " ++ c } [] + + +{-| glyphiconSortByAlphabet_ +-} glyphiconSortByAlphabet_ : Html msg -glyphiconSortByAlphabet_ = glyphiconSortByAlphabet' "" -{-| glyphiconSortByAlphabetAlt' -} -glyphiconSortByAlphabetAlt' : ClassString -> Html msg -glyphiconSortByAlphabetAlt' c = span' {class = "glyphicon glyphicon-sort-by-alphabet-alt " ++ c} [] -{-| glyphiconSortByAlphabetAlt_ -} +glyphiconSortByAlphabet_ = + glyphiconSortByAlphabet_ "" + + +{-| glyphiconSortByAlphabetAlt' +-} +glyphiconSortByAlphabetAlt_ : ClassString -> Html msg +glyphiconSortByAlphabetAlt_ c = + span_ { class = "glyphicon glyphicon-sort-by-alphabet-alt " ++ c } [] + + +{-| glyphiconSortByAlphabetAlt_ +-} glyphiconSortByAlphabetAlt_ : Html msg -glyphiconSortByAlphabetAlt_ = glyphiconSortByAlphabetAlt' "" -{-| glyphiconSortByOrder' -} -glyphiconSortByOrder' : ClassString -> Html msg -glyphiconSortByOrder' c = span' {class = "glyphicon glyphicon-sort-by-order " ++ c} [] -{-| glyphiconSortByOrder_ -} +glyphiconSortByAlphabetAlt_ = + glyphiconSortByAlphabetAlt_ "" + + +{-| glyphiconSortByOrder' +-} +glyphiconSortByOrder_ : ClassString -> Html msg +glyphiconSortByOrder_ c = + span_ { class = "glyphicon glyphicon-sort-by-order " ++ c } [] + + +{-| glyphiconSortByOrder_ +-} glyphiconSortByOrder_ : Html msg -glyphiconSortByOrder_ = glyphiconSortByOrder' "" -{-| glyphiconSortByOrderAlt' -} -glyphiconSortByOrderAlt' : ClassString -> Html msg -glyphiconSortByOrderAlt' c = span' {class = "glyphicon glyphicon-sort-by-order-alt " ++ c} [] -{-| glyphiconSortByOrderAlt_ -} +glyphiconSortByOrder_ = + glyphiconSortByOrder_ "" + + +{-| glyphiconSortByOrderAlt' +-} +glyphiconSortByOrderAlt_ : ClassString -> Html msg +glyphiconSortByOrderAlt_ c = + span_ { class = "glyphicon glyphicon-sort-by-order-alt " ++ c } [] + + +{-| glyphiconSortByOrderAlt_ +-} glyphiconSortByOrderAlt_ : Html msg -glyphiconSortByOrderAlt_ = glyphiconSortByOrderAlt' "" -{-| glyphiconSortByAttributes' -} -glyphiconSortByAttributes' : ClassString -> Html msg -glyphiconSortByAttributes' c = span' {class = "glyphicon glyphicon-sort-by-attributes " ++ c} [] -{-| glyphiconSortByAttributes_ -} +glyphiconSortByOrderAlt_ = + glyphiconSortByOrderAlt_ "" + + +{-| glyphiconSortByAttributes' +-} +glyphiconSortByAttributes_ : ClassString -> Html msg +glyphiconSortByAttributes_ c = + span_ { class = "glyphicon glyphicon-sort-by-attributes " ++ c } [] + + +{-| glyphiconSortByAttributes_ +-} glyphiconSortByAttributes_ : Html msg -glyphiconSortByAttributes_ = glyphiconSortByAttributes' "" -{-| glyphiconSortByAttributesAlt' -} -glyphiconSortByAttributesAlt' : ClassString -> Html msg -glyphiconSortByAttributesAlt' c = span' {class = "glyphicon glyphicon-sort-by-attributes-alt " ++ c} [] -{-| glyphiconSortByAttributesAlt_ -} +glyphiconSortByAttributes_ = + glyphiconSortByAttributes_ "" + + +{-| glyphiconSortByAttributesAlt' +-} +glyphiconSortByAttributesAlt_ : ClassString -> Html msg +glyphiconSortByAttributesAlt_ c = + span_ { class = "glyphicon glyphicon-sort-by-attributes-alt " ++ c } [] + + +{-| glyphiconSortByAttributesAlt_ +-} glyphiconSortByAttributesAlt_ : Html msg -glyphiconSortByAttributesAlt_ = glyphiconSortByAttributesAlt' "" -{-| glyphiconUnchecked' -} -glyphiconUnchecked' : ClassString -> Html msg -glyphiconUnchecked' c = span' {class = "glyphicon glyphicon-unchecked " ++ c} [] -{-| glyphiconUnchecked_ -} +glyphiconSortByAttributesAlt_ = + glyphiconSortByAttributesAlt_ "" + + +{-| glyphiconUnchecked' +-} +glyphiconUnchecked_ : ClassString -> Html msg +glyphiconUnchecked_ c = + span_ { class = "glyphicon glyphicon-unchecked " ++ c } [] + + +{-| glyphiconUnchecked_ +-} glyphiconUnchecked_ : Html msg -glyphiconUnchecked_ = glyphiconUnchecked' "" -{-| glyphiconExpand' -} -glyphiconExpand' : ClassString -> Html msg -glyphiconExpand' c = span' {class = "glyphicon glyphicon-expand " ++ c} [] -{-| glyphiconExpand_ -} +glyphiconUnchecked_ = + glyphiconUnchecked_ "" + + +{-| glyphiconExpand' +-} +glyphiconExpand_ : ClassString -> Html msg +glyphiconExpand_ c = + span_ { class = "glyphicon glyphicon-expand " ++ c } [] + + +{-| glyphiconExpand_ +-} glyphiconExpand_ : Html msg -glyphiconExpand_ = glyphiconExpand' "" -{-| glyphiconCollapseDown' -} -glyphiconCollapseDown' : ClassString -> Html msg -glyphiconCollapseDown' c = span' {class = "glyphicon glyphicon-collapse-down " ++ c} [] -{-| glyphiconCollapseDown_ -} +glyphiconExpand_ = + glyphiconExpand_ "" + + +{-| glyphiconCollapseDown' +-} +glyphiconCollapseDown_ : ClassString -> Html msg +glyphiconCollapseDown_ c = + span_ { class = "glyphicon glyphicon-collapse-down " ++ c } [] + + +{-| glyphiconCollapseDown_ +-} glyphiconCollapseDown_ : Html msg -glyphiconCollapseDown_ = glyphiconCollapseDown' "" -{-| glyphiconCollapseUp' -} -glyphiconCollapseUp' : ClassString -> Html msg -glyphiconCollapseUp' c = span' {class = "glyphicon glyphicon-collapse-up " ++ c} [] -{-| glyphiconCollapseUp_ -} +glyphiconCollapseDown_ = + glyphiconCollapseDown_ "" + + +{-| glyphiconCollapseUp' +-} +glyphiconCollapseUp_ : ClassString -> Html msg +glyphiconCollapseUp_ c = + span_ { class = "glyphicon glyphicon-collapse-up " ++ c } [] + + +{-| glyphiconCollapseUp_ +-} glyphiconCollapseUp_ : Html msg -glyphiconCollapseUp_ = glyphiconCollapseUp' "" -{-| glyphiconLogIn' -} -glyphiconLogIn' : ClassString -> Html msg -glyphiconLogIn' c = span' {class = "glyphicon glyphicon-log-in " ++ c} [] -{-| glyphiconLogIn_ -} +glyphiconCollapseUp_ = + glyphiconCollapseUp_ "" + + +{-| glyphiconLogIn' +-} +glyphiconLogIn_ : ClassString -> Html msg +glyphiconLogIn_ c = + span_ { class = "glyphicon glyphicon-log-in " ++ c } [] + + +{-| glyphiconLogIn_ +-} glyphiconLogIn_ : Html msg -glyphiconLogIn_ = glyphiconLogIn' "" -{-| glyphiconFlash' -} -glyphiconFlash' : ClassString -> Html msg -glyphiconFlash' c = span' {class = "glyphicon glyphicon-flash " ++ c} [] -{-| glyphiconFlash_ -} +glyphiconLogIn_ = + glyphiconLogIn_ "" + + +{-| glyphiconFlash' +-} +glyphiconFlash_ : ClassString -> Html msg +glyphiconFlash_ c = + span_ { class = "glyphicon glyphicon-flash " ++ c } [] + + +{-| glyphiconFlash_ +-} glyphiconFlash_ : Html msg -glyphiconFlash_ = glyphiconFlash' "" -{-| glyphiconLogOut' -} -glyphiconLogOut' : ClassString -> Html msg -glyphiconLogOut' c = span' {class = "glyphicon glyphicon-log-out " ++ c} [] -{-| glyphiconLogOut_ -} +glyphiconFlash_ = + glyphiconFlash_ "" + + +{-| glyphiconLogOut' +-} +glyphiconLogOut_ : ClassString -> Html msg +glyphiconLogOut_ c = + span_ { class = "glyphicon glyphicon-log-out " ++ c } [] + + +{-| glyphiconLogOut_ +-} glyphiconLogOut_ : Html msg -glyphiconLogOut_ = glyphiconLogOut' "" -{-| glyphiconNewWindow' -} -glyphiconNewWindow' : ClassString -> Html msg -glyphiconNewWindow' c = span' {class = "glyphicon glyphicon-new-window " ++ c} [] -{-| glyphiconNewWindow_ -} +glyphiconLogOut_ = + glyphiconLogOut_ "" + + +{-| glyphiconNewWindow' +-} +glyphiconNewWindow_ : ClassString -> Html msg +glyphiconNewWindow_ c = + span_ { class = "glyphicon glyphicon-new-window " ++ c } [] + + +{-| glyphiconNewWindow_ +-} glyphiconNewWindow_ : Html msg -glyphiconNewWindow_ = glyphiconNewWindow' "" -{-| glyphiconRecord' -} -glyphiconRecord' : ClassString -> Html msg -glyphiconRecord' c = span' {class = "glyphicon glyphicon-record " ++ c} [] -{-| glyphiconRecord_ -} +glyphiconNewWindow_ = + glyphiconNewWindow_ "" + + +{-| glyphiconRecord' +-} +glyphiconRecord_ : ClassString -> Html msg +glyphiconRecord_ c = + span_ { class = "glyphicon glyphicon-record " ++ c } [] + + +{-| glyphiconRecord_ +-} glyphiconRecord_ : Html msg -glyphiconRecord_ = glyphiconRecord' "" -{-| glyphiconSave' -} -glyphiconSave' : ClassString -> Html msg -glyphiconSave' c = span' {class = "glyphicon glyphicon-save " ++ c} [] -{-| glyphiconSave_ -} +glyphiconRecord_ = + glyphiconRecord_ "" + + +{-| glyphiconSave' +-} +glyphiconSave_ : ClassString -> Html msg +glyphiconSave_ c = + span_ { class = "glyphicon glyphicon-save " ++ c } [] + + +{-| glyphiconSave_ +-} glyphiconSave_ : Html msg -glyphiconSave_ = glyphiconSave' "" -{-| glyphiconOpen' -} -glyphiconOpen' : ClassString -> Html msg -glyphiconOpen' c = span' {class = "glyphicon glyphicon-open " ++ c} [] -{-| glyphiconOpen_ -} +glyphiconSave_ = + glyphiconSave_ "" + + +{-| glyphiconOpen' +-} +glyphiconOpen_ : ClassString -> Html msg +glyphiconOpen_ c = + span_ { class = "glyphicon glyphicon-open " ++ c } [] + + +{-| glyphiconOpen_ +-} glyphiconOpen_ : Html msg -glyphiconOpen_ = glyphiconOpen' "" -{-| glyphiconSaved' -} -glyphiconSaved' : ClassString -> Html msg -glyphiconSaved' c = span' {class = "glyphicon glyphicon-saved " ++ c} [] -{-| glyphiconSaved_ -} +glyphiconOpen_ = + glyphiconOpen_ "" + + +{-| glyphiconSaved' +-} +glyphiconSaved_ : ClassString -> Html msg +glyphiconSaved_ c = + span_ { class = "glyphicon glyphicon-saved " ++ c } [] + + +{-| glyphiconSaved_ +-} glyphiconSaved_ : Html msg -glyphiconSaved_ = glyphiconSaved' "" -{-| glyphiconImport' -} -glyphiconImport' : ClassString -> Html msg -glyphiconImport' c = span' {class = "glyphicon glyphicon-import " ++ c} [] -{-| glyphiconImport_ -} +glyphiconSaved_ = + glyphiconSaved_ "" + + +{-| glyphiconImport' +-} +glyphiconImport_ : ClassString -> Html msg +glyphiconImport_ c = + span_ { class = "glyphicon glyphicon-import " ++ c } [] + + +{-| glyphiconImport_ +-} glyphiconImport_ : Html msg -glyphiconImport_ = glyphiconImport' "" -{-| glyphiconExport' -} -glyphiconExport' : ClassString -> Html msg -glyphiconExport' c = span' {class = "glyphicon glyphicon-export " ++ c} [] -{-| glyphiconExport_ -} +glyphiconImport_ = + glyphiconImport_ "" + + +{-| glyphiconExport' +-} +glyphiconExport_ : ClassString -> Html msg +glyphiconExport_ c = + span_ { class = "glyphicon glyphicon-export " ++ c } [] + + +{-| glyphiconExport_ +-} glyphiconExport_ : Html msg -glyphiconExport_ = glyphiconExport' "" -{-| glyphiconSend' -} -glyphiconSend' : ClassString -> Html msg -glyphiconSend' c = span' {class = "glyphicon glyphicon-send " ++ c} [] -{-| glyphiconSend_ -} +glyphiconExport_ = + glyphiconExport_ "" + + +{-| glyphiconSend' +-} +glyphiconSend_ : ClassString -> Html msg +glyphiconSend_ c = + span_ { class = "glyphicon glyphicon-send " ++ c } [] + + +{-| glyphiconSend_ +-} glyphiconSend_ : Html msg -glyphiconSend_ = glyphiconSend' "" -{-| glyphiconFloppyDisk' -} -glyphiconFloppyDisk' : ClassString -> Html msg -glyphiconFloppyDisk' c = span' {class = "glyphicon glyphicon-floppy-disk " ++ c} [] -{-| glyphiconFloppyDisk_ -} +glyphiconSend_ = + glyphiconSend_ "" + + +{-| glyphiconFloppyDisk' +-} +glyphiconFloppyDisk_ : ClassString -> Html msg +glyphiconFloppyDisk_ c = + span_ { class = "glyphicon glyphicon-floppy-disk " ++ c } [] + + +{-| glyphiconFloppyDisk_ +-} glyphiconFloppyDisk_ : Html msg -glyphiconFloppyDisk_ = glyphiconFloppyDisk' "" -{-| glyphiconFloppySaved' -} -glyphiconFloppySaved' : ClassString -> Html msg -glyphiconFloppySaved' c = span' {class = "glyphicon glyphicon-floppy-saved " ++ c} [] -{-| glyphiconFloppySaved_ -} +glyphiconFloppyDisk_ = + glyphiconFloppyDisk_ "" + + +{-| glyphiconFloppySaved' +-} +glyphiconFloppySaved_ : ClassString -> Html msg +glyphiconFloppySaved_ c = + span_ { class = "glyphicon glyphicon-floppy-saved " ++ c } [] + + +{-| glyphiconFloppySaved_ +-} glyphiconFloppySaved_ : Html msg -glyphiconFloppySaved_ = glyphiconFloppySaved' "" -{-| glyphiconFloppyRemove' -} -glyphiconFloppyRemove' : ClassString -> Html msg -glyphiconFloppyRemove' c = span' {class = "glyphicon glyphicon-floppy-remove " ++ c} [] -{-| glyphiconFloppyRemove_ -} +glyphiconFloppySaved_ = + glyphiconFloppySaved_ "" + + +{-| glyphiconFloppyRemove' +-} +glyphiconFloppyRemove_ : ClassString -> Html msg +glyphiconFloppyRemove_ c = + span_ { class = "glyphicon glyphicon-floppy-remove " ++ c } [] + + +{-| glyphiconFloppyRemove_ +-} glyphiconFloppyRemove_ : Html msg -glyphiconFloppyRemove_ = glyphiconFloppyRemove' "" -{-| glyphiconFloppySave' -} -glyphiconFloppySave' : ClassString -> Html msg -glyphiconFloppySave' c = span' {class = "glyphicon glyphicon-floppy-save " ++ c} [] -{-| glyphiconFloppySave_ -} +glyphiconFloppyRemove_ = + glyphiconFloppyRemove_ "" + + +{-| glyphiconFloppySave' +-} +glyphiconFloppySave_ : ClassString -> Html msg +glyphiconFloppySave_ c = + span_ { class = "glyphicon glyphicon-floppy-save " ++ c } [] + + +{-| glyphiconFloppySave_ +-} glyphiconFloppySave_ : Html msg -glyphiconFloppySave_ = glyphiconFloppySave' "" -{-| glyphiconFloppyOpen' -} -glyphiconFloppyOpen' : ClassString -> Html msg -glyphiconFloppyOpen' c = span' {class = "glyphicon glyphicon-floppy-open " ++ c} [] -{-| glyphiconFloppyOpen_ -} +glyphiconFloppySave_ = + glyphiconFloppySave_ "" + + +{-| glyphiconFloppyOpen' +-} +glyphiconFloppyOpen_ : ClassString -> Html msg +glyphiconFloppyOpen_ c = + span_ { class = "glyphicon glyphicon-floppy-open " ++ c } [] + + +{-| glyphiconFloppyOpen_ +-} glyphiconFloppyOpen_ : Html msg -glyphiconFloppyOpen_ = glyphiconFloppyOpen' "" -{-| glyphiconCreditCard' -} -glyphiconCreditCard' : ClassString -> Html msg -glyphiconCreditCard' c = span' {class = "glyphicon glyphicon-credit-card " ++ c} [] -{-| glyphiconCreditCard_ -} +glyphiconFloppyOpen_ = + glyphiconFloppyOpen_ "" + + +{-| glyphiconCreditCard' +-} +glyphiconCreditCard_ : ClassString -> Html msg +glyphiconCreditCard_ c = + span_ { class = "glyphicon glyphicon-credit-card " ++ c } [] + + +{-| glyphiconCreditCard_ +-} glyphiconCreditCard_ : Html msg -glyphiconCreditCard_ = glyphiconCreditCard' "" -{-| glyphiconTransfer' -} -glyphiconTransfer' : ClassString -> Html msg -glyphiconTransfer' c = span' {class = "glyphicon glyphicon-transfer " ++ c} [] -{-| glyphiconTransfer_ -} +glyphiconCreditCard_ = + glyphiconCreditCard_ "" + + +{-| glyphiconTransfer' +-} +glyphiconTransfer_ : ClassString -> Html msg +glyphiconTransfer_ c = + span_ { class = "glyphicon glyphicon-transfer " ++ c } [] + + +{-| glyphiconTransfer_ +-} glyphiconTransfer_ : Html msg -glyphiconTransfer_ = glyphiconTransfer' "" -{-| glyphiconCutlery' -} -glyphiconCutlery' : ClassString -> Html msg -glyphiconCutlery' c = span' {class = "glyphicon glyphicon-cutlery " ++ c} [] -{-| glyphiconCutlery_ -} +glyphiconTransfer_ = + glyphiconTransfer_ "" + + +{-| glyphiconCutlery' +-} +glyphiconCutlery_ : ClassString -> Html msg +glyphiconCutlery_ c = + span_ { class = "glyphicon glyphicon-cutlery " ++ c } [] + + +{-| glyphiconCutlery_ +-} glyphiconCutlery_ : Html msg -glyphiconCutlery_ = glyphiconCutlery' "" -{-| glyphiconHeader' -} -glyphiconHeader' : ClassString -> Html msg -glyphiconHeader' c = span' {class = "glyphicon glyphicon-header " ++ c} [] -{-| glyphiconHeader_ -} +glyphiconCutlery_ = + glyphiconCutlery_ "" + + +{-| glyphiconHeader' +-} +glyphiconHeader_ : ClassString -> Html msg +glyphiconHeader_ c = + span_ { class = "glyphicon glyphicon-header " ++ c } [] + + +{-| glyphiconHeader_ +-} glyphiconHeader_ : Html msg -glyphiconHeader_ = glyphiconHeader' "" -{-| glyphiconCompressed' -} -glyphiconCompressed' : ClassString -> Html msg -glyphiconCompressed' c = span' {class = "glyphicon glyphicon-compressed " ++ c} [] -{-| glyphiconCompressed_ -} +glyphiconHeader_ = + glyphiconHeader_ "" + + +{-| glyphiconCompressed' +-} +glyphiconCompressed_ : ClassString -> Html msg +glyphiconCompressed_ c = + span_ { class = "glyphicon glyphicon-compressed " ++ c } [] + + +{-| glyphiconCompressed_ +-} glyphiconCompressed_ : Html msg -glyphiconCompressed_ = glyphiconCompressed' "" -{-| glyphiconEarphone' -} -glyphiconEarphone' : ClassString -> Html msg -glyphiconEarphone' c = span' {class = "glyphicon glyphicon-earphone " ++ c} [] -{-| glyphiconEarphone_ -} +glyphiconCompressed_ = + glyphiconCompressed_ "" + + +{-| glyphiconEarphone' +-} +glyphiconEarphone_ : ClassString -> Html msg +glyphiconEarphone_ c = + span_ { class = "glyphicon glyphicon-earphone " ++ c } [] + + +{-| glyphiconEarphone_ +-} glyphiconEarphone_ : Html msg -glyphiconEarphone_ = glyphiconEarphone' "" -{-| glyphiconPhoneAlt' -} -glyphiconPhoneAlt' : ClassString -> Html msg -glyphiconPhoneAlt' c = span' {class = "glyphicon glyphicon-phone-alt " ++ c} [] -{-| glyphiconPhoneAlt_ -} +glyphiconEarphone_ = + glyphiconEarphone_ "" + + +{-| glyphiconPhoneAlt' +-} +glyphiconPhoneAlt_ : ClassString -> Html msg +glyphiconPhoneAlt_ c = + span_ { class = "glyphicon glyphicon-phone-alt " ++ c } [] + + +{-| glyphiconPhoneAlt_ +-} glyphiconPhoneAlt_ : Html msg -glyphiconPhoneAlt_ = glyphiconPhoneAlt' "" -{-| glyphiconTower' -} -glyphiconTower' : ClassString -> Html msg -glyphiconTower' c = span' {class = "glyphicon glyphicon-tower " ++ c} [] -{-| glyphiconTower_ -} +glyphiconPhoneAlt_ = + glyphiconPhoneAlt_ "" + + +{-| glyphiconTower' +-} +glyphiconTower_ : ClassString -> Html msg +glyphiconTower_ c = + span_ { class = "glyphicon glyphicon-tower " ++ c } [] + + +{-| glyphiconTower_ +-} glyphiconTower_ : Html msg -glyphiconTower_ = glyphiconTower' "" -{-| glyphiconStats' -} -glyphiconStats' : ClassString -> Html msg -glyphiconStats' c = span' {class = "glyphicon glyphicon-stats " ++ c} [] -{-| glyphiconStats_ -} +glyphiconTower_ = + glyphiconTower_ "" + + +{-| glyphiconStats' +-} +glyphiconStats_ : ClassString -> Html msg +glyphiconStats_ c = + span_ { class = "glyphicon glyphicon-stats " ++ c } [] + + +{-| glyphiconStats_ +-} glyphiconStats_ : Html msg -glyphiconStats_ = glyphiconStats' "" -{-| glyphiconSdVideo' -} -glyphiconSdVideo' : ClassString -> Html msg -glyphiconSdVideo' c = span' {class = "glyphicon glyphicon-sd-video " ++ c} [] -{-| glyphiconSdVideo_ -} +glyphiconStats_ = + glyphiconStats_ "" + + +{-| glyphiconSdVideo' +-} +glyphiconSdVideo_ : ClassString -> Html msg +glyphiconSdVideo_ c = + span_ { class = "glyphicon glyphicon-sd-video " ++ c } [] + + +{-| glyphiconSdVideo_ +-} glyphiconSdVideo_ : Html msg -glyphiconSdVideo_ = glyphiconSdVideo' "" -{-| glyphiconHdVideo' -} -glyphiconHdVideo' : ClassString -> Html msg -glyphiconHdVideo' c = span' {class = "glyphicon glyphicon-hd-video " ++ c} [] -{-| glyphiconHdVideo_ -} +glyphiconSdVideo_ = + glyphiconSdVideo_ "" + + +{-| glyphiconHdVideo' +-} +glyphiconHdVideo_ : ClassString -> Html msg +glyphiconHdVideo_ c = + span_ { class = "glyphicon glyphicon-hd-video " ++ c } [] + + +{-| glyphiconHdVideo_ +-} glyphiconHdVideo_ : Html msg -glyphiconHdVideo_ = glyphiconHdVideo' "" -{-| glyphiconSubtitles' -} -glyphiconSubtitles' : ClassString -> Html msg -glyphiconSubtitles' c = span' {class = "glyphicon glyphicon-subtitles " ++ c} [] -{-| glyphiconSubtitles_ -} +glyphiconHdVideo_ = + glyphiconHdVideo_ "" + + +{-| glyphiconSubtitles' +-} +glyphiconSubtitles_ : ClassString -> Html msg +glyphiconSubtitles_ c = + span_ { class = "glyphicon glyphicon-subtitles " ++ c } [] + + +{-| glyphiconSubtitles_ +-} glyphiconSubtitles_ : Html msg -glyphiconSubtitles_ = glyphiconSubtitles' "" -{-| glyphiconSoundStereo' -} -glyphiconSoundStereo' : ClassString -> Html msg -glyphiconSoundStereo' c = span' {class = "glyphicon glyphicon-sound-stereo " ++ c} [] -{-| glyphiconSoundStereo_ -} +glyphiconSubtitles_ = + glyphiconSubtitles_ "" + + +{-| glyphiconSoundStereo' +-} +glyphiconSoundStereo_ : ClassString -> Html msg +glyphiconSoundStereo_ c = + span_ { class = "glyphicon glyphicon-sound-stereo " ++ c } [] + + +{-| glyphiconSoundStereo_ +-} glyphiconSoundStereo_ : Html msg -glyphiconSoundStereo_ = glyphiconSoundStereo' "" -{-| glyphiconSoundDolby' -} -glyphiconSoundDolby' : ClassString -> Html msg -glyphiconSoundDolby' c = span' {class = "glyphicon glyphicon-sound-dolby " ++ c} [] -{-| glyphiconSoundDolby_ -} +glyphiconSoundStereo_ = + glyphiconSoundStereo_ "" + + +{-| glyphiconSoundDolby' +-} +glyphiconSoundDolby_ : ClassString -> Html msg +glyphiconSoundDolby_ c = + span_ { class = "glyphicon glyphicon-sound-dolby " ++ c } [] + + +{-| glyphiconSoundDolby_ +-} glyphiconSoundDolby_ : Html msg -glyphiconSoundDolby_ = glyphiconSoundDolby' "" -{-| glyphiconSound51' -} -glyphiconSound51' : ClassString -> Html msg -glyphiconSound51' c = span' {class = "glyphicon glyphicon-sound-5-1 " ++ c} [] -{-| glyphiconSound51_ -} +glyphiconSoundDolby_ = + glyphiconSoundDolby_ "" + + +{-| glyphiconSound51' +-} +glyphiconSound51_ : ClassString -> Html msg +glyphiconSound51_ c = + span_ { class = "glyphicon glyphicon-sound-5-1 " ++ c } [] + + +{-| glyphiconSound51_ +-} glyphiconSound51_ : Html msg -glyphiconSound51_ = glyphiconSound51' "" -{-| glyphiconSound61' -} -glyphiconSound61' : ClassString -> Html msg -glyphiconSound61' c = span' {class = "glyphicon glyphicon-sound-6-1 " ++ c} [] -{-| glyphiconSound61_ -} +glyphiconSound51_ = + glyphiconSound51_ "" + + +{-| glyphiconSound61' +-} +glyphiconSound61_ : ClassString -> Html msg +glyphiconSound61_ c = + span_ { class = "glyphicon glyphicon-sound-6-1 " ++ c } [] + + +{-| glyphiconSound61_ +-} glyphiconSound61_ : Html msg -glyphiconSound61_ = glyphiconSound61' "" -{-| glyphiconSound71' -} -glyphiconSound71' : ClassString -> Html msg -glyphiconSound71' c = span' {class = "glyphicon glyphicon-sound-7-1 " ++ c} [] -{-| glyphiconSound71_ -} +glyphiconSound61_ = + glyphiconSound61_ "" + + +{-| glyphiconSound71' +-} +glyphiconSound71_ : ClassString -> Html msg +glyphiconSound71_ c = + span_ { class = "glyphicon glyphicon-sound-7-1 " ++ c } [] + + +{-| glyphiconSound71_ +-} glyphiconSound71_ : Html msg -glyphiconSound71_ = glyphiconSound71' "" -{-| glyphiconCopyrightMark' -} -glyphiconCopyrightMark' : ClassString -> Html msg -glyphiconCopyrightMark' c = span' {class = "glyphicon glyphicon-copyright-mark " ++ c} [] -{-| glyphiconCopyrightMark_ -} +glyphiconSound71_ = + glyphiconSound71_ "" + + +{-| glyphiconCopyrightMark' +-} +glyphiconCopyrightMark_ : ClassString -> Html msg +glyphiconCopyrightMark_ c = + span_ { class = "glyphicon glyphicon-copyright-mark " ++ c } [] + + +{-| glyphiconCopyrightMark_ +-} glyphiconCopyrightMark_ : Html msg -glyphiconCopyrightMark_ = glyphiconCopyrightMark' "" -{-| glyphiconRegistrationMark' -} -glyphiconRegistrationMark' : ClassString -> Html msg -glyphiconRegistrationMark' c = span' {class = "glyphicon glyphicon-registration-mark " ++ c} [] -{-| glyphiconRegistrationMark_ -} +glyphiconCopyrightMark_ = + glyphiconCopyrightMark_ "" + + +{-| glyphiconRegistrationMark' +-} +glyphiconRegistrationMark_ : ClassString -> Html msg +glyphiconRegistrationMark_ c = + span_ { class = "glyphicon glyphicon-registration-mark " ++ c } [] + + +{-| glyphiconRegistrationMark_ +-} glyphiconRegistrationMark_ : Html msg -glyphiconRegistrationMark_ = glyphiconRegistrationMark' "" -{-| glyphiconCloudDownload' -} -glyphiconCloudDownload' : ClassString -> Html msg -glyphiconCloudDownload' c = span' {class = "glyphicon glyphicon-cloud-download " ++ c} [] -{-| glyphiconCloudDownload_ -} +glyphiconRegistrationMark_ = + glyphiconRegistrationMark_ "" + + +{-| glyphiconCloudDownload' +-} +glyphiconCloudDownload_ : ClassString -> Html msg +glyphiconCloudDownload_ c = + span_ { class = "glyphicon glyphicon-cloud-download " ++ c } [] + + +{-| glyphiconCloudDownload_ +-} glyphiconCloudDownload_ : Html msg -glyphiconCloudDownload_ = glyphiconCloudDownload' "" -{-| glyphiconCloudUpload' -} -glyphiconCloudUpload' : ClassString -> Html msg -glyphiconCloudUpload' c = span' {class = "glyphicon glyphicon-cloud-upload " ++ c} [] -{-| glyphiconCloudUpload_ -} +glyphiconCloudDownload_ = + glyphiconCloudDownload_ "" + + +{-| glyphiconCloudUpload' +-} +glyphiconCloudUpload_ : ClassString -> Html msg +glyphiconCloudUpload_ c = + span_ { class = "glyphicon glyphicon-cloud-upload " ++ c } [] + + +{-| glyphiconCloudUpload_ +-} glyphiconCloudUpload_ : Html msg -glyphiconCloudUpload_ = glyphiconCloudUpload' "" -{-| glyphiconTreeConifer' -} -glyphiconTreeConifer' : ClassString -> Html msg -glyphiconTreeConifer' c = span' {class = "glyphicon glyphicon-tree-conifer " ++ c} [] -{-| glyphiconTreeConifer_ -} +glyphiconCloudUpload_ = + glyphiconCloudUpload_ "" + + +{-| glyphiconTreeConifer' +-} +glyphiconTreeConifer_ : ClassString -> Html msg +glyphiconTreeConifer_ c = + span_ { class = "glyphicon glyphicon-tree-conifer " ++ c } [] + + +{-| glyphiconTreeConifer_ +-} glyphiconTreeConifer_ : Html msg -glyphiconTreeConifer_ = glyphiconTreeConifer' "" -{-| glyphiconTreeDeciduous' -} -glyphiconTreeDeciduous' : ClassString -> Html msg -glyphiconTreeDeciduous' c = span' {class = "glyphicon glyphicon-tree-deciduous " ++ c} [] -{-| glyphiconTreeDeciduous_ -} +glyphiconTreeConifer_ = + glyphiconTreeConifer_ "" + + +{-| glyphiconTreeDeciduous' +-} +glyphiconTreeDeciduous_ : ClassString -> Html msg +glyphiconTreeDeciduous_ c = + span_ { class = "glyphicon glyphicon-tree-deciduous " ++ c } [] + + +{-| glyphiconTreeDeciduous_ +-} glyphiconTreeDeciduous_ : Html msg -glyphiconTreeDeciduous_ = glyphiconTreeDeciduous' "" +glyphiconTreeDeciduous_ = + glyphiconTreeDeciduous_ "" + --- Dropdowns +-- Dropdowns -- Button groups --btnGroup' = --
@@ -1933,73 +3812,94 @@ glyphiconTreeDeciduous_ = glyphiconTreeDeciduous' "" --btnGroupLg' = --btnGroupSm' = --btnGroupXs' = - --btnToolbar = -- - --btnGroupVertical' = --btnGroupJustified' --
- -- Input groups - -- Navs - -- Navbar -{-| navbar' -} -navbar' : ClassString -> List (Html msg) -> Html msg -navbar' c = nav' {class = "navbar " ++ c} -{-| navbarDefault' -} -navbarDefault' : ClassString -> List (Html msg) -> Html msg -navbarDefault' c = navbar' ("navbar-default " ++ c) + + +{-| navbar' +-} +navbar_ : ClassString -> List (Html msg) -> Html msg +navbar_ c = + nav_ { class = "navbar " ++ c } + + +{-| navbarDefault' +-} +navbarDefault_ : ClassString -> List (Html msg) -> Html msg +navbarDefault_ c = + navbar_ ("navbar-default " ++ c) + + + -- navbarDefaultStaticTop_ = navbar' "navbar navbar-default navbar-static-top", id "top"{-role "banner"-} ] -{-| navbarHeader_ -} + + +{-| navbarHeader_ +-} navbarHeader_ : List (Html msg) -> Html msg -navbarHeader_ = div' {class = "navbar-header"} +navbarHeader_ = + div_ { class = "navbar-header" } --- Breadcrumbs --- Pagination +-- Breadcrumbs +-- Pagination -- Labels - -- Badges - -- Jumbotron - -- Page header - -- Thumbnails - -- Alerts - -- Progress bars - -- Media object - -- List group - -- Panels -{-| panelDefault_ -} + + +{-| panelDefault_ +-} panelDefault_ : List (Html msg) -> Html msg -panelDefault_ = div' {class = "panel panel-default"} -{-| panelHeading_ -} +panelDefault_ = + div_ { class = "panel panel-default" } + + +{-| panelHeading_ +-} panelHeading_ : List (Html msg) -> Html msg -panelHeading_ = div' {class = "panel-heading"} -{-| panelBody_ -} +panelHeading_ = + div_ { class = "panel-heading" } + + +{-| panelBody_ +-} panelBody_ : List (Html msg) -> Html msg -panelBody_ = div' {class = "panel-body"} -{-| panelFooter_ -} +panelBody_ = + div_ { class = "panel-body" } + + +{-| panelFooter_ +-} panelFooter_ : List (Html msg) -> Html msg -panelFooter_ = div' {class = "panel-footer"} +panelFooter_ = + div_ { class = "panel-footer" } + -{-| panelTitle_ -} +{-| panelTitle_ +-} panelTitle_ : TextString -> Html msg -panelTitle_ t = h2' {class = "panel-title"} [text t] +panelTitle_ t = + h2_ { class = "panel-title" } [ text t ] + {-| A panel with the [default style](http://getbootstrap.com/components/#panels-heading). @@ -2029,32 +3929,58 @@ panelTitle_ t = h2' {class = "panel-title"} [text t] ] ] -} -panelDefault' : TextString -> List ((BtnParam msg), msg) -> List (Html msg) -> Html msg -panelDefault' t btns bs = - let uncurry3 = \f (x,y) -> f x y - in panelDefault_ - [ panelHeading_ - <| (uncurry3 (btnXsSuccess' "pull-right") `List.map` List.reverse btns) ++ [ panelTitle_ t ] - , panelBody_ bs - ] +panelDefault_ : TextString -> List ( BtnParam msg, msg ) -> List (Html msg) -> Html msg +panelDefault_ t btns bs = + let + uncurry3 = + \f ( x, y ) -> f x y + in + panelDefault_ + [ panelHeading_ <| + (List.map (uncurry3 (btnXsSuccess_ "pull-right")) (List.reverse btns)) + ++ [ panelTitle_ t ] + , panelBody_ bs + ] + -- Responsive embed -{-| embedResponsive16x9_ -} + + +{-| embedResponsive16x9_ +-} embedResponsive16x9_ : List (Html msg) -> Html msg -embedResponsive16x9_ = div' {class = "embed-responsive embed-responsive-16by9"} -{-| embedResponsive4x3_ -} +embedResponsive16x9_ = + div_ { class = "embed-responsive embed-responsive-16by9" } + + +{-| embedResponsive4x3_ +-} embedResponsive4x3_ : List (Html msg) -> Html msg -embedResponsive4x3_ = div' {class = "embed-responsive embed-responsive-4by3"} +embedResponsive4x3_ = + div_ { class = "embed-responsive embed-responsive-4by3" } + -- Wells -{-| well_ -} + + +{-| well_ +-} well_ : List (Html msg) -> Html msg -well_ = div' {class = "well"} -{-| wellSm_ -} +well_ = + div_ { class = "well" } + + +{-| wellSm_ +-} wellSm_ : List (Html msg) -> Html msg -wellSm_ = div' {class = "well well-sm"} -{-| wellLg_ -} +wellSm_ = + div_ { class = "well well-sm" } + + +{-| wellLg_ +-} wellLg_ : List (Html msg) -> Html msg -wellLg_ = div' {class = "well well-lg"} +wellLg_ = + div_ { class = "well well-lg" } diff --git a/src/Bootstrap/Html/Internal.elm b/src/Bootstrap/Html/Internal.elm index 3add2a1..fa38cc0 100644 --- a/src/Bootstrap/Html/Internal.elm +++ b/src/Bootstrap/Html/Internal.elm @@ -1,10 +1,12 @@ module Bootstrap.Html.Internal exposing (..) + {-| Internals for Bootstrap.Html See [Bootstrap.Html](http://package.elm-lang.org/packages/circuithub/elm-bootstrap-html/latest/Bootstrap-Html) @docs BtnParam, btnc, btncNoevent, colOffset -} --import String + import Html exposing (..) import Html.Attributes exposing (..) import Html.Shorthand exposing (..) @@ -14,60 +16,90 @@ import String import List exposing ((::)) import Maybe + --appendWithSpace : String -> String -> String --appendWithSpace x y = x ++ ' ' `String.cons` y + {-| Button parameters -} type alias BtnParam msg = - { icon : Maybe (Html msg) - , label : Maybe TextString - , tooltip : Maybe String - } + { icon : Maybe (Html msg) + , label : Maybe TextString + , tooltip : Maybe String + } + {-| Helper for creating buttons -} btnc : ClassString -> String -> BtnParam msg -> msg -> Html msg -btnc c typ {icon,label,tooltip} x = - let filterJust = List.filterMap identity - in button - ( type' typ - :: class' ("btn " ++ c) - :: Html.onClick x - :: filterJust - [ Maybe.map title tooltip - ] - ) - ( case (icon, label) of - (Just icon', Just label') -> [icon', text (' ' `String.cons` label')] - (Just icon', _ ) -> [icon'] - (_ , Just label') -> [text label'] - _ -> [] - ) +btnc c typ { icon, label, tooltip } x = + let + filterJust = + List.filterMap identity + in + button + (type_ typ + :: class_ ("btn " ++ c) + :: Html.onClick x + :: filterJust + [ Maybe.map title tooltip + ] + ) + (case ( icon, label ) of + ( Just icon_, Just label_ ) -> + [ icon_, text (String.cons ' ' label_) ] + + ( Just icon_, _ ) -> + [ icon_ ] + + ( _, Just label_ ) -> + [ text label_ ] + + _ -> + [] + ) + {-| Same as `btnc`, but without an event (used for submit buttons) -} btncNoevent : ClassString -> String -> BtnParam msg -> Html msg -btncNoevent c typ {icon,label,tooltip} = - let filterJust = List.filterMap identity - in button - ( type' typ - :: class' ("btn " ++ c) - :: filterJust - [ Maybe.map title tooltip - ] - ) - ( case (icon, label) of - (Just icon', Just label') -> [icon', text (' ' `String.cons` label')] - (Just icon', _ ) -> [icon'] - (_ , Just label') -> [text label'] - _ -> [] - ) +btncNoevent c typ { icon, label, tooltip } = + let + filterJust = + List.filterMap identity + in + button + (type_ typ + :: class_ ("btn " ++ c) + :: filterJust + [ Maybe.map title tooltip + ] + ) + (case ( icon, label ) of + ( Just icon_, Just label_ ) -> + [ icon_, text (String.cons ' ' label_) ] + + ( Just icon_, _ ) -> + [ icon_ ] + + ( _, Just label_ ) -> + [ text label_ ] + + _ -> + [] + ) + {-| Create a class string for the `col-__-__ col-__-offset-__` pattern -} colOffset : String -> Int -> Int -> ClassString colOffset gridsize colspan offset = - let prefix = "col" ++ '-' `String.cons` gridsize ++ "-" - in if offset > 0 then prefix ++ toString colspan ++ ' ' `String.cons` prefix ++ "offset-" ++ toString offset - else prefix ++ toString colspan + let + prefix = + "col" ++ String.cons '-' gridsize ++ "-" + in + if offset > 0 then + prefix ++ toString colspan ++ String.cons ' ' prefix ++ "offset-" ++ toString offset + else + prefix ++ toString colspan