|
Lines 335-341
is ($mappings->{$set2_id}->[0]->{marcvalue}, 'myOtherMarcValue', 'marcvalue fiel
Link Here
|
| 335 |
|
335 |
|
| 336 |
my $selective_mappings = GetOAISetsMappings( { set_id => $set1_id } ); |
336 |
my $selective_mappings = GetOAISetsMappings( { set_id => $set1_id } ); |
| 337 |
is( scalar keys %$selective_mappings, 1, 'Selective mappings only returns mappings for selected set_id' ); |
337 |
is( scalar keys %$selective_mappings, 1, 'Selective mappings only returns mappings for selected set_id' ); |
| 338 |
is_deeply($selective_mappings->{$set1_id},$mappings->{$set1_id}, 'Correct mapping returned for selective mappings'); |
338 |
is_deeply( $selective_mappings->{$set1_id}, $mappings->{$set1_id}, 'Correct mapping returned for selective mappings' ); |
| 339 |
|
339 |
|
| 340 |
# ---------- Testing GetOAISetMappings ---------- |
340 |
# ---------- Testing GetOAISetMappings ---------- |
| 341 |
ok (!defined(GetOAISetMappings), 'GetOAISetMappings without argument is undef'); |
341 |
ok (!defined(GetOAISetMappings), 'GetOAISetMappings without argument is undef'); |
| 342 |
- |
|
|