NoRedInk/noredink-ui
1
1
Fork 0
mirror of https://github.com/NoRedInk/noredink-ui.git synced 2024-11-28 18:24:04 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fork at the theme level

Browse Source
This commit is contained in:
Tessa Kelly 2018-06-15 09:55:19 -07:00
parent 8751820df1
commit b0820f52b4
1 changed files with 86 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

126
src/Nri/Ui/Checkbox/V3.elm
View File

@ -214,52 +214,98 @@ viewAttention model =
buildCheckbox : List String -> Bool -> Model msg -> Html.Html msg
buildCheckbox modifierClasses showLabels model =
let
containerClasses =
List.map (\a -> ( "checkbox-" ++ a, True )) <|
List.concat
[ modifierClasses
, case model.theme of
Square Gray ->
[ "SquareClass", "GrayClass" ]
toClassList =
List.map (\a -> ( "checkbox-" ++ a, True )) >> Attributes.classList
Square Orange ->
[ "SquareClass", "OrangeClass" ]
Square Default ->
[ "SquareClass" ]
Locked ->
[ "LockedClass" ]
LockOnInside ->
[ "LockOnInsideClass" ]
Unlockable ->
[ "UnlockableClass" ]
Round ->
[ "RoundClass" ]
Disabled ->
[ "SquareClass", "Opacified" ]
Premium ->
[ "SquareClass", "PremiumClass" ]
]
in
viewCheckbox model
{ containerStyles = css containerStyles
, containerClasses = Attributes.classList containerClasses
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent =
labelContent =
if showLabels then
Html.span [] [ Html.text model.label ]
else
Html.span [ Accessibility.Styled.Style.invisible ]
[ Html.text model.label ]
}
in
viewCheckbox model <|
case model.theme of
Square Gray ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "SquareClass", "GrayClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Square Orange ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "SquareClass", "OrangeClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Square Default ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "SquareClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Locked ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "LockedClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
LockOnInside ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "LockOnInsideClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Unlockable ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "UnlockableClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Round ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "RoundClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Disabled ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "SquareClass", "Opacified" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
Premium ->
{ containerStyles = css containerStyles
, containerClasses = toClassList (modifierClasses ++ [ "SquareClass", "PremiumClass" ])
, checkboxStyles = css checkboxStyles
, labelStyles = Tuple.first (labelClassAndTheme model.isChecked)
, labelClasses = Tuple.second (labelClassAndTheme model.isChecked)
, labelContent = labelContent
}
viewCheckbox model config =