|
Lines 278-284
subtest 'Tests for delete method' => sub {
Link Here
|
| 278 |
# Test delete in table without primary key (..) |
278 |
# Test delete in table without primary key (..) |
| 279 |
is( $schema->source('TmpHoldsqueue')->primary_columns, 0, |
279 |
is( $schema->source('TmpHoldsqueue')->primary_columns, 0, |
| 280 |
'Table without primary key detected' ); |
280 |
'Table without primary key detected' ); |
| 281 |
my $bibno = 123; # just a number |
281 |
my $bibno = $builder->build_sample_biblio->biblionumber; |
| 282 |
my $cnt1 = $schema->resultset('TmpHoldsqueue')->count; |
282 |
my $cnt1 = $schema->resultset('TmpHoldsqueue')->count; |
| 283 |
# Insert a new record in TmpHoldsqueue with that biblionumber |
283 |
# Insert a new record in TmpHoldsqueue with that biblionumber |
| 284 |
my $val = { biblionumber => $bibno }; |
284 |
my $val = { biblionumber => $bibno }; |
| 285 |
- |
|
|