Bug 12554: (tests followup) need to mock GetCurrency

Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
This commit is contained in:
Tomás Cohen Arazi 2014-08-03 16:41:18 -03:00
parent dfc5017acb
commit 54c4c73e47

View file

@ -37,6 +37,12 @@ my $context = new Test::MockModule('C4::Context');
mock_marcfromkohafield();
my $currency = new Test::MockModule('C4::Budgets');
$currency->mock( 'GetCurrency', sub {
return { symbol => '$', isocode => 'USD',
currency => 'USD', active => 1 };
});
sub run_tests {
# Undef C4::Biblio::inverted_field_map to avoid problems introduced
@ -178,6 +184,8 @@ sub run_tests {
is( $isbns->[$i], $more_isbns[$i],
"(GetMarcISBN) Corretly retrieves ISBN #". ($i + 1));
}
is( GetMarcPrice( $record_for_isbn, $marcflavour ), 100,
"GetMarcPrice returns the correct value");
}