diff options
Diffstat (limited to 'elm/Lib/Html.elm')
-rw-r--r-- | elm/Lib/Html.elm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/elm/Lib/Html.elm b/elm/Lib/Html.elm index 3aae21c7..edf0a0c5 100644 --- a/elm/Lib/Html.elm +++ b/elm/Lib/Html.elm @@ -17,6 +17,12 @@ onClickN action = custom "click" (JD.succeed { message = action, stopPropagation br_ : Int -> Html m br_ n = if n == 1 then br [] [] else span [] <| List.repeat n <| br [] [] + +inputButton : String -> m -> List (Attribute m) -> Html m +inputButton val onch attrs = + input ([ type_ "button", class "submit", tabindex 10, value val, onClick onch] ++ attrs) [] + + -- Submit button with loading indicator and error message display submitButton : String -> Api.State -> Bool -> Bool -> Html m submitButton val state valid load = div [] |