View | Details | Raw Unified | Return to bug 22511
Collapse All | Expand All

(-)a/installer/data/mysql/atomicupdate/bug_22511.perl (-2 / +1 lines)
Lines 15-21 if ( CheckVersion($DBversion) ) { Link Here
15
    $sth->execute();
15
    $sth->execute();
16
    while (my $row = $sth->fetchrow_hashref) {
16
    while (my $row = $sth->fetchrow_hashref) {
17
        $sth2->execute($row->{accountlines_id});
17
        $sth2->execute($row->{accountlines_id});
18
        my $result = $sth2->fetchrow;
18
        my $result = $sth2->fetchrow_hashref;
19
        my $type = $types_map->{$result->{'type'}} // 'Pay';
19
        my $type = $types_map->{$result->{'type'}} // 'Pay';
20
        $sth3->execute($type,$row->{accountlines_id});
20
        $sth3->execute($type,$row->{accountlines_id});
21
    }
21
    }
22
- 

Return to bug 22511