summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2022-04-29 12:30:54 +0200
committerYorhel <git@yorhel.nl>2022-04-29 12:30:54 +0200
commit68bab7125bb74ec49c7c30c2d1e145833bddeb64 (patch)
tree313e1c49165a6199d843d993ebb1b19bda30fc7e
parentdeebec91883227f483eb6f53d8b9d98af88dbe7d (diff)
VN::Page: Allow length votes for VNs with only a trial and no TBA releases
-rw-r--r--lib/VNWeb/VN/Page.pm8
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();