A banner to show error alerts
A banner to show neutral alerts
A banner for success alerts
Changes from V5:
elm-refactor upgrade script
import Css
import Html.Styled as Html
import Html.Styled.Attributes as Attributes
import Nri.Ui.BannerAlert.V6 as BannerAlert
import Nri.Ui.Fonts.V1 as Fonts
upgrade_Nri_Ui_BannerAlert_V5_alert bannerContent maybeMsg =
BannerAlert.alert
(case bannerContent of
Nri.Ui.BannerAlert.V5.Plain string ->
[ Html.text string ]
Nri.Ui.BannerAlert.V5.WithLink { target, prefixText, linkUrl, postfixText, linkText } ->
[ Html.div
[ Attributes.css
[ Css.fontSize (Css.px 20)
, Css.fontWeight (Css.int 700)
, Css.lineHeight (Css.px 25)
, Css.maxWidth (Css.px 600)
, Fonts.baseFont
]
]
[ Html.text prefixText
, Html.a
[ Attributes.href linkUrl
, case target of
Nri.Ui.BannerAlert.V5.Blank ->
Attributes.target "_blank"
Nri.Ui.BannerAlert.V5.Self ->
Attributes.target "_self"
]
[ Html.text linkText ]
, Html.text postfixText
]
]
)
maybeMsg
upgrade_Nri_Ui_BannerAlert_V5_error bannerContent maybeMsg =
BannerAlert.error
(case bannerContent of
Nri.Ui.BannerAlert.V5.Plain string ->
[ Html.text string ]
Nri.Ui.BannerAlert.V5.WithLink { target, prefixText, linkUrl, postfixText, linkText } ->
[ Html.div
[ Attributes.css
[ Css.fontSize (Css.px 20)
, Css.fontWeight (Css.int 700)
, Css.lineHeight (Css.px 25)
, Css.maxWidth (Css.px 600)
, Fonts.baseFont
]
]
[ Html.text prefixText
, Html.a
[ Attributes.href linkUrl
, case target of
Nri.Ui.BannerAlert.V5.Blank ->
Attributes.target "_blank"
Nri.Ui.BannerAlert.V5.Self ->
Attributes.target "_self"
]
[ Html.text linkText ]
, Html.text postfixText
]
]
)
maybeMsg
upgrade_Nri_Ui_BannerAlert_V5_neutral bannerContent maybeMsg =
BannerAlert.neutral
(case bannerContent of
Nri.Ui.BannerAlert.V5.Plain string ->
[ Html.text string ]
Nri.Ui.BannerAlert.V5.WithLink { target, prefixText, linkUrl, postfixText, linkText } ->
[ Html.div
[ Attributes.css
[ Css.fontSize (Css.px 20)
, Css.fontWeight (Css.int 700)
, Css.lineHeight (Css.px 25)
, Css.maxWidth (Css.px 600)
, Fonts.baseFont
]
]
[ Html.text prefixText
, Html.a
[ Attributes.href linkUrl
, case target of
Nri.Ui.BannerAlert.V5.Blank ->
Attributes.target "_blank"
Nri.Ui.BannerAlert.V5.Self ->
Attributes.target "_self"
]
[ Html.text linkText ]
, Html.text postfixText
]
]
)
maybeMsg
upgrade_Nri_Ui_BannerAlert_V5_success bannerContent maybeMsg =
BannerAlert.success
(case bannerContent of
Nri.Ui.BannerAlert.V5.Plain string ->
[ Html.text string ]
Nri.Ui.BannerAlert.V5.WithLink { target, prefixText, linkUrl, postfixText, linkText } ->
[ Html.div
[ Attributes.css
[ Css.fontSize (Css.px 20)
, Css.fontWeight (Css.int 700)
, Css.lineHeight (Css.px 25)
, Css.maxWidth (Css.px 600)
, Fonts.baseFont
]
]
[ Html.text prefixText
, Html.a
[ Attributes.href linkUrl
, case target of
Nri.Ui.BannerAlert.V5.Blank ->
Attributes.target "_blank"
Nri.Ui.BannerAlert.V5.Self ->
Attributes.target "_self"
]
[ Html.text linkText ]
, Html.text postfixText
]
]
)
maybeMsg
A banner to show error alerts