summaryrefslogtreecommitdiff
path: root/lib/VNDB/Handler
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2016-11-03 18:33:15 +0100
committerYorhel <git@yorhel.nl>2016-11-03 18:33:15 +0100
commita9df5c8d7e22874d37938b27913f239ce31f9414 (patch)
treecc2fea20d37c4466b27e90564f5002dcdbd16207 /lib/VNDB/Handler
parent1e4cdeaca180bdfee0c552c57fccff8570856efd (diff)
List deleted releases when adding a new release
Diffstat (limited to 'lib/VNDB/Handler')
-rw-r--r--lib/VNDB/Handler/Releases.pm23
1 files changed, 23 insertions, 0 deletions
diff --git a/lib/VNDB/Handler/Releases.pm b/lib/VNDB/Handler/Releases.pm
index 62ba0c5a..31026efe 100644
--- a/lib/VNDB/Handler/Releases.pm
+++ b/lib/VNDB/Handler/Releases.pm
@@ -370,6 +370,7 @@ sub edit {
$self->htmlMainTabs('r', $r, $copy ? 'copy' : 'edit') if $rid;
$self->htmlMainTabs('v', $v, 'edit') if $vid;
$self->htmlEditMessage('r', $r, $title, $copy);
+ _listrel($self, $vid) if $vid && $self->reqMethod ne 'POST';
_form($self, $r, $v, $frm, $copy);
$self->htmlFooter;
}
@@ -467,6 +468,28 @@ sub _form {
);
}
+sub _listrel {
+ my($self, $vid) = @_;
+ my $l = $self->dbReleaseGet(vid => $vid, hidden_only => 1, results => 50);
+ return if !@$l;
+ div class => 'mainbox';
+ h1 'Deleted releases';
+ div class => 'warning';
+ p q{This visual novel has releases that have been deleted before. Please
+ review this list to make sure you're not adding a release that has already
+ been deleted before.};
+ br;
+ ul;
+ for(@$l) {
+ li;
+ txt '['.join(',', @{$_->{languages}}).'] ';
+ a href => "/r$_->{id}", title => $_->{original}||$_->{title}, "$_->{title} (r$_->{id})";
+ end;
+ }
+ end;
+ end;
+ end;
+}
sub browse {
my $self = shift;