NoRedInk/noredink-ui
1
1
Fork 0
mirror of https://github.com/NoRedInk/noredink-ui.git synced 2024-12-01 00:34:27 +03:00
Code Issues Packages Projects Releases Wiki Activity

Add actual html support

Browse Source
This commit is contained in:
Tessa Kelly 2019-04-17 14:02:48 -07:00
parent 63b2c8d2f5
commit 6207fd1f27
1 changed files with 23 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
src/Nri/Ui/Alert/V4.elm
View File

@ -29,13 +29,19 @@ import Nri.Ui.Svg.V1 as NriSvg exposing (Svg)
{-| -} {-| -}
complexError : Html msg -> Html msg complexError : Html msg -> Html msg
complexError content = complexError content =
Html.text "TODO" alert
[ exclamation Colors.purple
, alertHtml Colors.purple [ content ]
]
{-| -} {-| -}
complexWarning : Html msg -> Html msg complexWarning : Html msg -> Html msg
complexWarning content = complexWarning content =
Html.text "TODO" alert
[ exclamation Colors.red
, alertHtml Colors.red [ content ]
]
{-| -} {-| -}
@ -77,7 +83,7 @@ error : String -> Html msg
error content = error content =
alert alert
[ exclamation Colors.purple [ exclamation Colors.purple
, viewAlertContent Colors.purple content , alertString Colors.purple content
] ]
@ -98,7 +104,7 @@ success content =
] ]
[ NriSvg.toHtml checkmark ] [ NriSvg.toHtml checkmark ]
) )
, viewAlertContent Colors.greenDarkest content , alertString Colors.greenDarkest content
] ]
@ -107,7 +113,7 @@ tip : String -> Html msg
tip content = tip content =
alert alert
[ iconContainer [ Css.color Colors.yellow ] (NriSvg.toHtml bulb) [ iconContainer [ Css.color Colors.yellow ] (NriSvg.toHtml bulb)
, viewAlertContent Colors.navy content , alertString Colors.navy content
] ]
@ -116,7 +122,7 @@ warning : String -> Html msg
warning content = warning content =
alert alert
[ exclamation Colors.red [ exclamation Colors.red
, viewAlertContent Colors.red content , alertString Colors.red content
] ]
@ -165,10 +171,17 @@ iconContainer styles icon =
[ icon ] [ icon ]
viewAlertContent : Css.ColorValue compatible -> String -> Html.Styled.Html msg alertString : Css.ColorValue compatible -> String -> Html msg
viewAlertContent color content = alertString color content =
Markdown.toHtml Nothing content
|> List.map fromUnstyled
|> alertHtml color
alertHtml : Css.ColorValue compatible -> List (Html msg) -> Html msg
alertHtml color content =
Nri.Ui.styled Html.div Nri.Ui.styled Html.div
"Nri-Ui-Alert-V3__viewAlertContent" "Nri-Ui-Alert-V4--alert"
[ Css.color color [ Css.color color
, Fonts.baseFont , Fonts.baseFont
, Css.fontSize (Css.px 13) , Css.fontSize (Css.px 13)
@ -177,4 +190,4 @@ viewAlertContent color content =
, Css.Global.descendants [ Css.Global.p [ Css.margin Css.zero ] ] , Css.Global.descendants [ Css.Global.p [ Css.margin Css.zero ] ]
] ]
[] []
(Markdown.toHtml Nothing content |> List.map fromUnstyled) content