Lines 150-156
mocking_systempreferences_to_a_set_value(0);
Link Here
|
150 |
$report = C4::UsageStats->BuildReport(); |
150 |
$report = C4::UsageStats->BuildReport(); |
151 |
isa_ok( $report, 'HASH', '$report is a HASH' ); |
151 |
isa_ok( $report, 'HASH', '$report is a HASH' ); |
152 |
isa_ok( $report->{systempreferences}, 'HASH', '$report->{systempreferences} is a HASH' ); |
152 |
isa_ok( $report->{systempreferences}, 'HASH', '$report->{systempreferences} is a HASH' ); |
153 |
is( scalar( keys %{$report->{systempreferences}} ), 248, "There are 248 fields in $report->{systempreferences}" ); |
|
|
154 |
verif_systempreferences_values( $report, 0 ); |
153 |
verif_systempreferences_values( $report, 0 ); |
155 |
|
154 |
|
156 |
#mock with values |
155 |
#mock with values |
Lines 159-165
mocking_systempreferences_to_a_set_value(1);
Link Here
|
159 |
$report = C4::UsageStats->BuildReport(); |
158 |
$report = C4::UsageStats->BuildReport(); |
160 |
isa_ok( $report, 'HASH', '$report is a HASH' ); |
159 |
isa_ok( $report, 'HASH', '$report is a HASH' ); |
161 |
isa_ok( $report->{systempreferences}, 'HASH', '$report->{systempreferences} is a HASH' ); |
160 |
isa_ok( $report->{systempreferences}, 'HASH', '$report->{systempreferences} is a HASH' ); |
162 |
is( scalar( keys %{$report->{systempreferences}} ), 248, "There are 248 fields in $report->{systempreferences}" ); |
|
|
163 |
verif_systempreferences_values( $report, 1 ); |
161 |
verif_systempreferences_values( $report, 1 ); |
164 |
|
162 |
|
165 |
#Test if unwanted syspref are not sent |
163 |
#Test if unwanted syspref are not sent |
Lines 337-343
sub mocking_systempreferences_to_a_set_value {
Link Here
|
337 |
OrderPdfFormat |
335 |
OrderPdfFormat |
338 |
casAuthentication |
336 |
casAuthentication |
339 |
casLogout |
337 |
casLogout |
340 |
AllowPkiAuth |
338 |
AllowPKIAuth |
341 |
DebugLevel |
339 |
DebugLevel |
342 |
delimiter |
340 |
delimiter |
343 |
noItemTypeImages |
341 |
noItemTypeImages |
Lines 578-583
sub mocking_systempreferences_to_a_set_value {
Link Here
|
578 |
ILS-DI |
576 |
ILS-DI |
579 |
OAI-PMH |
577 |
OAI-PMH |
580 |
version |
578 |
version |
|
|
579 |
AudioAlerts |
581 |
/ |
580 |
/ |
582 |
) { |
581 |
) { |
583 |
t::lib::Mocks::mock_preference( $_, $set_value ); |
582 |
t::lib::Mocks::mock_preference( $_, $set_value ); |
584 |
- |
|
|