From 8b71b0ad8af4559c2edd4b5ee13d5ff43cab2f68 Mon Sep 17 00:00:00 2001 From: Yorhel Date: Sat, 4 Jul 2009 15:54:31 +0200 Subject: Don't allow creation of empty release edits Bug introduced in 1c3769e0bac96979cc1aba0a80081b69a8470528 --- lib/VNDB/Handler/Releases.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/VNDB/Handler/Releases.pm b/lib/VNDB/Handler/Releases.pm index a5ac1054..ba46d19f 100644 --- a/lib/VNDB/Handler/Releases.pm +++ b/lib/VNDB/Handler/Releases.pm @@ -332,7 +332,8 @@ sub edit { (join(',', sort @{$b4{platforms}}) eq join(',', sort @{$frm->{platforms}})) && (join(',', sort @$producers) eq join(',', sort map $_->{id}, @{$r->{producers}})) && (join(',', sort @$new_vn) eq join(',', sort map $_->{vid}, @$vn)) && - !grep !/^(platforms|producers|vn)$/ && $frm->{$_} ne $b4{$_}, keys %b4; + (join(',', sort @{$b4{languages}}) eq join(',', sort @{$frm->{languages}})) && + !grep !/^(platforms|producers|vn|languages)$/ && $frm->{$_} ne $b4{$_}, keys %b4; my %opts = ( (map { $_ => $frm->{$_} } qw| type title original gtin catalog languages website released -- cgit v1.2.3