diff options
| author | Yorhel <git@yorhel.nl> | 2020-09-03 10:17:15 +0200 |
|---|---|---|
| committer | Yorhel <git@yorhel.nl> | 2020-09-03 10:17:15 +0200 |
| commit | e9852ed38b6e57e871f2a89bfcc2f42d60f3a676 (patch) | |
| tree | 4532757552905ed14d30686fc0672dd0de00ecc9 | |
| parent | 0a0ac0eef0274656629e6fd5d4c7ef1a66792065 (diff) | |
Reviews: increase max character counts a bit for mini-reviews
| -rw-r--r-- | elm/Reviews/Edit.elm | 6 | ||||
| -rw-r--r-- | lib/VNWeb/Reviews/Edit.pm | 2 |
2 files changed, 4 insertions, 4 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." ] diff --git a/lib/VNWeb/Reviews/Edit.pm b/lib/VNWeb/Reviews/Edit.pm index 60b72111..dd252864 100644 --- a/lib/VNWeb/Reviews/Edit.pm +++ b/lib/VNWeb/Reviews/Edit.pm @@ -60,7 +60,7 @@ elm_api ReviewsEdit => $FORM_OUT, $FORM_IN, sub { validate_dbid 'SELECT id FROM vn WHERE id IN', $data->{vid}; validate_dbid 'SELECT id FROM releases WHERE id IN', $data->{rid} if defined $data->{rid}; - die "Review too long" if !$data->{isfull} && length $data->{text} > 700; + die "Review too long" if !$data->{isfull} && length $data->{text} > 800; $data->{text} = bb_subst_links $data->{text}; if($id) { |