diff --git a/installer/data/mysql/atomicupdate/bug_22511.perl b/installer/data/mysql/atomicupdate/bug_22511.perl
index 44474285dc..4ec384b072 100644
--- a/installer/data/mysql/atomicupdate/bug_22511.perl
+++ b/installer/data/mysql/atomicupdate/bug_22511.perl
@@ -15,7 +15,7 @@ if ( CheckVersion($DBversion) ) {
     $sth->execute();
     while (my $row = $sth->fetchrow_hashref) {
         $sth2->execute($row->{accountlines_id});
-        my $result = $sth2->fetchrow;
+        my $result = $sth2->fetchrow_hashref;
         my $type = $types_map->{$result->{'type'}} // 'Pay';
         $sth3->execute($type,$row->{accountlines_id});
     }