fix array length determining and cleanup

This commit is contained in:
Milan
2018-08-31 23:15:57 +02:00
parent 05b1251c1a
commit 3e338758e9
42 changed files with 7588 additions and 7660 deletions

View File

@@ -37,7 +37,7 @@ sub setAttributesFromSeriesTemplate {
series_id => $params->{series_id},
}
);
if ( @$series != 1 ) {
if ( scalar @$series != 1 ) {
uac::print_error("series not found");
return undef;
}
@@ -261,7 +261,7 @@ sub createEvent {
series_id => $event->{series_id},
}
);
if ( @$series != 1 ) {
if ( scalar @$series != 1 ) {
uac::print_error("series not found");
return undef;
}
@@ -279,7 +279,7 @@ sub createEvent {
uac::print_error("studio not found");
return undef;
}
unless ( @$studios == 1 ) {
unless ( scalar @$studios == 1 ) {
uac::print_error("studio not found");
return undef;
}