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

(-)a/t/db_dependent/TestBuilder.t (-1 / +1 lines)
Lines 395-401 subtest 'build_object() tests' => sub { Link Here
395
            eval "require $module";
395
            eval "require $module";
396
            my $object = $builder->build_object( { class => $module } );
396
            my $object = $builder->build_object( { class => $module } );
397
            is( ref($object), $module->object_class, "Testing $module" );
397
            is( ref($object), $module->object_class, "Testing $module" );
398
            if ( $module ne 'Koha::Old::Patrons' ) { # FIXME deletedborrowers does not have a PK
398
            if ( ! grep {$module eq $_ } qw( Koha::Old::Patrons Koha::Statistics ) ) { # FIXME deletedborrowers and statistics do not have a PK
399
                eval {$object->get_from_storage};
399
                eval {$object->get_from_storage};
400
                is( $@, '', "Module $module should have koha_object[s]_class method if needed" );
400
                is( $@, '', "Module $module should have koha_object[s]_class method if needed" );
401
            }
401
            }
(-)a/t/lib/TestBuilder.pm (-1 / +2 lines)
Lines 86-91 sub build_object { Link Here
86
    my $object;
86
    my $object;
87
    if ( $class eq 'Koha::Old::Patrons' ) {
87
    if ( $class eq 'Koha::Old::Patrons' ) {
88
        $object = $class->search({ borrowernumber => $hashref->{borrowernumber} })->next;
88
        $object = $class->search({ borrowernumber => $hashref->{borrowernumber} })->next;
89
    } elsif ( $class eq 'Koha::Statistics' ) {
90
        $object = $class->search({ datetime => $hashref->{datetime} })->next;
89
    } else {
91
    } else {
90
        my @ids;
92
        my @ids;
91
        my @pks = $self->schema->source( $class->_type )->primary_columns;
93
        my @pks = $self->schema->source( $class->_type )->primary_columns;
92
- 

Return to bug 24149