uue same order of imports

This commit is contained in:
Milan
2020-03-26 16:11:59 +01:00
parent 219d6d6965
commit f9c4e183df
19 changed files with 27 additions and 16 deletions

View File

@@ -5,7 +5,7 @@ use warnings;
no warnings 'redefine';
use Data::Dumper;
use CGI::Simple ();
use CGI::Simple();
use ModPerl::Util ();
use Date::Calc();
use Time::Local();
@@ -144,6 +144,7 @@ sub uploadRecording {
#$params->{duration} = $fileInfo->{duration};
$params = updateDatabase( $config, $params, $user ) if $params->{error} eq '';
} else {
print STDERR "could not get file handle\n";
$params->{error} .= 'Could not get file handle';
}
@@ -554,11 +555,9 @@ sub check_params {
$checked->{studio_id} = -1;
}
$checked->{action} = entry::element_of($params->{action},
['update', 'delete']);
$checked->{action} = entry::element_of( $params->{action}, ['upload', 'delete'] );
entry::set_strings( $checked, $params, [
'name', 'description', 'path' ]);
entry::set_strings( $checked, $params, [ 'name', 'description', 'path' ]);
$checked->{upload} = $params->{upload};
return $checked;