From 9f7bdb22ec6a68f58fab347c7ab89644c9e9d207 Mon Sep 17 00:00:00 2001 From: Yorhel Date: Sun, 11 Sep 2016 19:30:47 +0200 Subject: API: Add VN relations "official" field --- lib/Multi/API.pm | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'lib') diff --git a/lib/Multi/API.pm b/lib/Multi/API.pm index 258189ff..16069ec6 100644 --- a/lib/Multi/API.pm +++ b/lib/Multi/API.pm @@ -385,7 +385,6 @@ my %GET_VN = ( sql => 'SELECT %s FROM vn v WHERE NOT v.hidden AND (%s) %s', select => 'v.id', proc => sub { - delete $_[0]{latest}; $_[0]{id} *= 1 }, sortdef => 'id', @@ -451,7 +450,7 @@ my %GET_VN = ( ]], }, relations => { - fetch => [[ 'id', 'SELECT vr.id AS vid, v.id, vr.relation, v.title, v.original FROM vn_relations vr + fetch => [[ 'id', 'SELECT vr.id AS vid, v.id, vr.relation, v.title, v.original, vr.official FROM vn_relations vr JOIN vn v ON v.id = vr.vid WHERE vr.id IN(%s)', sub { my($r, $n) = @_; for my $i (@$r) { @@ -460,6 +459,7 @@ my %GET_VN = ( for (@$n) { $_->{id} *= 1; $_->{original} ||= undef; + $_->{official} = $_->{official} =~ /t/ ? TRUE : FALSE, delete $_->{vid}; } } @@ -555,7 +555,6 @@ my %GET_RELEASE = ( released => 'r.released %s', }, proc => sub { - delete $_[0]{latest}; $_[0]{id} *= 1 }, flags => { @@ -685,7 +684,6 @@ my %GET_PRODUCER = ( sql => 'SELECT %s FROM producers p WHERE NOT p.hidden AND (%s) %s', select => 'p.id', proc => sub { - delete $_[0]{latest}; $_[0]{id} *= 1 }, sortdef => 'id', @@ -759,7 +757,6 @@ my %GET_CHARACTER = ( sql => 'SELECT %s FROM chars c WHERE NOT c.hidden AND (%s) %s', select => 'c.id', proc => sub { - delete $_[0]{latest}; $_[0]{id} *= 1 }, sortdef => 'id', -- cgit v1.2.3