|
Lines 42-48
subtest 'Start with some trivial tests' => sub {
Link Here
|
| 42 |
isnt( $builder, undef, 'We got a builder' ); |
42 |
isnt( $builder, undef, 'We got a builder' ); |
| 43 |
|
43 |
|
| 44 |
my $data; |
44 |
my $data; |
| 45 |
warning_like { my $data = $builder->build; } qr/.+/, 'Catch a warning'; |
45 |
warning_like { $data = $builder->build; } qr/.+/, 'Catch a warning'; |
| 46 |
is( $data, undef, 'build without arguments returns undef' ); |
46 |
is( $data, undef, 'build without arguments returns undef' ); |
| 47 |
is( ref( $builder->schema ), 'Koha::Schema', 'check schema' ); |
47 |
is( ref( $builder->schema ), 'Koha::Schema', 'check schema' ); |
| 48 |
is( ref( $builder->can('delete') ), 'CODE', 'found delete method' ); |
48 |
is( ref( $builder->can('delete') ), 'CODE', 'found delete method' ); |
| 49 |
- |
|
|