|
Lines 24-30
use Module::Load::Conditional qw/check_install/;
Link Here
|
| 24 |
|
24 |
|
| 25 |
BEGIN { |
25 |
BEGIN { |
| 26 |
if ( check_install( module => 'Test::DBIx::Class' ) ) { |
26 |
if ( check_install( module => 'Test::DBIx::Class' ) ) { |
| 27 |
plan tests => 10; |
27 |
plan tests => 8; |
| 28 |
} else { |
28 |
} else { |
| 29 |
plan skip_all => "Need Test::DBIx::Class" |
29 |
plan skip_all => "Need Test::DBIx::Class" |
| 30 |
} |
30 |
} |
|
Lines 74-87
is( $members_attributetypes[0]->{'class'},
Link Here
|
| 74 |
is( $members_attributetypes[1]->{'class'}, |
74 |
is( $members_attributetypes[1]->{'class'}, |
| 75 |
'silver', 'Second class value is silver' ); |
75 |
'silver', 'Second class value is silver' ); |
| 76 |
|
76 |
|
| 77 |
ok( C4::Members::AttributeTypes::AttributeTypeExists('one'), |
|
|
| 78 |
'checking an attribute type exists' ); |
| 79 |
|
| 80 |
ok( |
| 81 |
!C4::Members::AttributeTypes::AttributeTypeExists('three'), |
| 82 |
"checking a attribute that isn't in the code doesn't exist" |
| 83 |
); |
| 84 |
|
| 85 |
ok( C4::Members::AttributeTypes->fetch('one'), "testing fetch feature" ); |
77 |
ok( C4::Members::AttributeTypes->fetch('one'), "testing fetch feature" ); |
| 86 |
|
78 |
|
| 87 |
ok( !C4::Members::AttributeTypes->fetch('FAKE'), |
79 |
ok( !C4::Members::AttributeTypes->fetch('FAKE'), |
| 88 |
- |
|
|