lib/CrashTest/Storage/Sql.pm
changeset 42 604ffca3aec1
parent 34 e0d6597078a5
child 54 2218a127abd9
equal deleted inserted replaced
41:f2292404519a 42:604ffca3aec1
    41         pager   => $dbcrashs->pager,
    41         pager   => $dbcrashs->pager,
    42         crashs  => [],
    42         crashs  => [],
    43     };
    43     };
    44     for my $crash($dbcrashs->all) {
    44     for my $crash($dbcrashs->all) {
    45         my $filename = File::Spec->catfile($self->{data_path}, $crash->uuid);
    45         my $filename = File::Spec->catfile($self->{data_path}, $crash->uuid);
    46         push $results->{crashs}, {
    46         push @{$results->{crashs}}, {
    47             file        => $filename,
    47             file        => $filename,
    48             uuid        => $crash->uuid,
    48             uuid        => $crash->uuid,
    49             product     => $crash->product->name,
    49             product     => $crash->product->name,
    50             version     => $crash->product->version,
    50             version     => $crash->product->version,
    51             user        => $crash->crash_user->user_id,
    51             user        => $crash->crash_user->user_id,