Switch slide modal from button v8 to button v10

This commit is contained in:
Tessa Kelly 2021-09-27 15:20:30 -07:00
parent 372effedf2
commit 6d56d3db49

View File

@ -26,7 +26,7 @@ import Html.Styled.Events exposing (onClick)
import Html.Styled.Keyed as Keyed import Html.Styled.Keyed as Keyed
import Nri.Ui import Nri.Ui
import Nri.Ui.AssetPath exposing (Asset(..)) import Nri.Ui.AssetPath exposing (Asset(..))
import Nri.Ui.Button.V8 as Button import Nri.Ui.Button.V10 as Button
import Nri.Ui.Colors.Extra import Nri.Ui.Colors.Extra
import Nri.Ui.Colors.V1 as Colors import Nri.Ui.Colors.V1 as Colors
import Nri.Ui.Fonts.V1 as Fonts import Nri.Ui.Fonts.V1 as Fonts
@ -330,7 +330,7 @@ viewActiveFooter { previous, current, upcoming } =
viewFlexibleFooter viewFlexibleFooter
{ buttonLabel = current.buttonLabel { buttonLabel = current.buttonLabel
, buttonMsg = nextPanel , buttonMsg = nextPanel
, buttonState = Button.Enabled , buttonState = Button.enabled
} }
dots dots
@ -338,7 +338,7 @@ viewActiveFooter { previous, current, upcoming } =
viewFlexibleFooter : viewFlexibleFooter :
{ buttonLabel : String { buttonLabel : String
, buttonMsg : msg , buttonMsg : msg
, buttonState : Button.ButtonState , buttonState : Button.Attribute msg
} }
-> List (Dot msg) -> List (Dot msg)
-> Html msg -> Html msg
@ -353,16 +353,12 @@ viewFlexibleFooter { buttonLabel, buttonMsg, buttonState } dotList =
, Css.minHeight (Css.px 125) -- so the footer doesn't compress on Safari , Css.minHeight (Css.px 125) -- so the footer doesn't compress on Safari
] ]
[] []
[ Button.button [ Button.button buttonLabel
{ onClick = buttonMsg [ Button.onClick buttonMsg
, size = Button.Large , Button.large
, style = Button.Primary , Button.exactWidth 230
, width = Button.WidthExact 230 , buttonState
} ]
{ label = buttonLabel
, state = buttonState
, icon = Nothing
}
, dotList , dotList
|> List.map dot |> List.map dot
|> div [ css [ Css.marginTop (Css.px 16) ] ] |> div [ css [ Css.marginTop (Css.px 16) ] ]