summaryrefslogtreecommitdiff
path: root/elm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2020-09-03 10:17:15 +0200
committerYorhel <git@yorhel.nl>2020-09-03 10:17:15 +0200
commite9852ed38b6e57e871f2a89bfcc2f42d60f3a676 (patch)
tree4532757552905ed14d30686fc0672dd0de00ecc9 /elm
parent0a0ac0eef0274656629e6fd5d4c7ef1a66792065 (diff)
Reviews: increase max character counts a bit for mini-reviews
Diffstat (limited to 'elm')
-rw-r--r--elm/Reviews/Edit.elm6
1 files changed, 3 insertions, 3 deletions
diff --git a/elm/Reviews/Edit.elm b/elm/Reviews/Edit.elm
index d53d2702..99a5b48e 100644
--- a/elm/Reviews/Edit.elm
+++ b/elm/Reviews/Edit.elm
@@ -99,8 +99,8 @@ showrel r = "[" ++ (RDate.format (RDate.expand r.released)) ++ " " ++ (String.jo
view : Model -> Html Msg
view model =
- let minChars = if model.isfull then 900 else 200
- maxChars = if model.isfull then 100000 else 700
+ let minChars = if model.isfull then 1000 else 200
+ maxChars = if model.isfull then 100000 else 800
len = String.length model.text.data
in
form_ Submit (model.state == Api.Loading)
@@ -130,7 +130,7 @@ view model =
, tr [ class "newpart" ] [ td [ colspan 2 ] [ text "" ] ]
, formField "Review type"
[ label [] [ inputRadio "type" (model.isfull == False) (\_ -> Full False), b [] [ text " Mini review" ]
- , text <| " - Recommendation-style, maximum 700 characters." ]
+ , text <| " - Recommendation-style, maximum 800 characters." ]
, br [] []
, label [] [ inputRadio "type" (model.isfull == True ) (\_ -> Full True ), b [] [ text " Full review" ]
, text " - Longer, more detailed." ]