Add naive implementation of the details for the Large and Banner messages

This commit is contained in:
Tessa Kelly 2021-05-14 14:34:11 -07:00
parent 8e3b69ca45
commit 3302dcd930

View File

@ -182,6 +182,12 @@ view attributes_ =
Just msg ->
largeDismissButton msg
, case attributes.codeDetails of
Just details ->
viewCodeDetails details
Nothing ->
text ""
]
Banner ->
@ -233,6 +239,12 @@ view attributes_ =
Just msg ->
bannerDismissButton msg
, case attributes.codeDetails of
Just details ->
viewCodeDetails details
Nothing ->
text ""
]