|
Lines 117-122
subtest 'GetReservedAuthorisedValues' => sub {
Link Here
|
| 117 |
'cn_source' => 1, |
117 |
'cn_source' => 1, |
| 118 |
'categorycode' => 1, |
118 |
'categorycode' => 1, |
| 119 |
'biblio_framework' => 1, |
119 |
'biblio_framework' => 1, |
|
|
120 |
'list' => 1, |
| 120 |
); |
121 |
); |
| 121 |
|
122 |
|
| 122 |
my $reserved_authorised_values = GetReservedAuthorisedValues(); |
123 |
my $reserved_authorised_values = GetReservedAuthorisedValues(); |
|
Lines 125-131
subtest 'GetReservedAuthorisedValues' => sub {
Link Here
|
| 125 |
}; |
126 |
}; |
| 126 |
|
127 |
|
| 127 |
subtest 'IsAuthorisedValueValid' => sub { |
128 |
subtest 'IsAuthorisedValueValid' => sub { |
| 128 |
plan tests => 8; |
129 |
plan tests => 9; |
| 129 |
ok( IsAuthorisedValueValid('LOC'), |
130 |
ok( IsAuthorisedValueValid('LOC'), |
| 130 |
'User defined authorised value category is valid'); |
131 |
'User defined authorised value category is valid'); |
| 131 |
|
132 |
|
| 132 |
- |
|
|