use sorted keys on SQL update statement

make sure, sorted keys are used for query and binding variable.
This commit is contained in:
Milan
2020-02-29 23:01:49 +01:00
parent 9b392ae0f4
commit 9f8170507e
13 changed files with 48 additions and 34 deletions

View File

@@ -179,8 +179,9 @@ sub update ($$) {
}
$entry->{modified_at} = time::time_to_datetime( time() );
my $values = join( ",", map { $_ . '=?' } ( keys %$entry ) );
my @bind_values = map { $entry->{$_} } ( keys %$entry );
my @keys = sort keys %$entry;
my $values = join( ",", map { $_ . '=?' } @keys );
my @bind_values = map { $entry->{$_} } @keys;
push @bind_values, $entry->{user};
push @bind_values, $entry->{project_id};
push @bind_values, $entry->{studio_id};