| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/Struct/UI.elm')
| -rw-r--r-- | src/Struct/UI.elm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/Struct/UI.elm b/src/Struct/UI.elm index b3bdaae..108ab04 100644 --- a/src/Struct/UI.elm +++ b/src/Struct/UI.elm @@ -52,6 +52,12 @@ display_error : (Html.Html Struct.Event.Type) -> Type -> Type display_error html ui = {ui | displayed_errors = (List.append ui.displayed_errors [html])} +display_string_error : String -> Type -> Type +display_string_error string ui = + {ui | + displayed_errors = (List.append ui.displayed_errors [(Html.text string)]) + } + display_choice : Int -> (Html.Html Struct.Event.Type) -> Type -> Type display_choice ix html ui = {ui | displayed_choices = (List.append ui.displayed_choices [(ix, html)])} |