diff options
| author | Yorhel <git@yorhel.nl> | 2021-08-04 11:23:54 +0200 |
|---|---|---|
| committer | Yorhel <git@yorhel.nl> | 2021-08-04 11:23:54 +0200 |
| commit | 801ddce64be0af357967e8346fbc934b8a8d50ed (patch) | |
| tree | 2bf65cf0b93c5e55f60c19081c5d1ec10bad8eca /elm | |
| parent | 868a6a609e31ffee1a7f0c91f431cf450795230a (diff) | |
VN::Page: Aggergate play times per speed + use median
Diffstat (limited to 'elm')
| -rw-r--r-- | elm/VNLengthVote.elm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/elm/VNLengthVote.elm b/elm/VNLengthVote.elm index 5c1a08ac..0f799854 100644 --- a/elm/VNLengthVote.elm +++ b/elm/VNLengthVote.elm @@ -117,12 +117,12 @@ update msg model = view : Model -> Html Msg -view model = span [] <| +view model = div [class "lengthvotefrm"] <| let cansubmit = enclen model > 0 && model.speed /= -1 && model.rid /= "" rels = Maybe.withDefault [] model.rels frm = [ form_ "" (if cansubmit then Submit else Noop) False - [ br [] [] + [ br_ 2 , text "How long did you take to finish this VN?" , br [] [] , text "- Only vote if you've completed all normal/true endings." @@ -154,12 +154,12 @@ view model = span [] <| ] ] in [ text " " - , a [ onClickD (Open (not model.open)), href "#" ] + , a [ onClickD (Open (not model.open)), href "#", style "float" "right" ] [ text <| if model.length == 0 then "Vote ยป" else "My vote: " ++ String.fromInt (model.length // 60) ++ "h" ++ if modBy 60 model.length /= 0 then String.fromInt (modBy 60 model.length) ++ "m" else "" ] ] ++ case (model.open, model.state) of (False, _) -> [] (_, Api.Normal) -> frm - (_, Api.Error e) -> [ br [] [], b [ class "standout" ] [ text ("Error: " ++ Api.showResponse e) ] ] - (_, Api.Loading) -> [ span [ class "spinner" ] [] ] + (_, Api.Error e) -> [ br_ 2, b [ class "standout" ] [ text ("Error: " ++ Api.showResponse e) ] ] + (_, Api.Loading) -> [ span [ style "float" "right", class "spinner" ] [] ] |