diff options
author | Yorhel <git@yorhel.nl> | 2022-04-29 12:30:54 +0200 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2022-04-29 12:30:54 +0200 |
commit | 68bab7125bb74ec49c7c30c2d1e145833bddeb64 (patch) | |
tree | 313e1c49165a6199d843d993ebb1b19bda30fc7e | |
parent | deebec91883227f483eb6f53d8b9d98af88dbe7d (diff) |
VN::Page: Allow length votes for VNs with only a trial and no TBA releases
-rw-r--r-- | lib/VNWeb/VN/Page.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/VNWeb/VN/Page.pm b/lib/VNWeb/VN/Page.pm index f8f0ea6d..da5f639f 100644 --- a/lib/VNWeb/VN/Page.pm +++ b/lib/VNWeb/VN/Page.pm @@ -162,7 +162,13 @@ sub infobox_length_ { my($v) = @_; my $today = strftime('%Y%m%d', gmtime); - return if !grep $_->{rtype} ne 'trial' && $_->{released} <= $today, $v->{releases}->@*; + + # Length is only relevant if this VN has been released. Some VNs have been + # cancelled and only have a trial, but we allow votes on those as well. + my $hastrial = grep $_->{rtype} eq 'trial' && $_->{released} <= $today, $v->{releases}->@*; + my $hasnontba = grep $_->{rtype} ne 'trial' && $_->{released} <= $today, $v->{releases}->@*; + my $hastba = grep $_->{rtype} ne 'trial' && $_->{released} > $today, $v->{releases}->@*; + return if !($hasnontba || ($hastrial && !$hastba)); return if !$v->{length} && !$v->{c_lengthnum} && !VNWeb::VN::Length::can_vote(); |