Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 17602: (follow-up) t/Koha_ExternalContent_RecordedBooks.t

Browse source 
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
Srdjan 2017-10-10 14:26:22 +13:00 committed by Nick Clemens
parent eb4be268d8
commit 8cb8223e12
1 changed files with 41 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

41
t/Koha_ExternalContent_RecordedBooks.t Executable file
View file

@ -0,0 +1,41 @@
#!/usr/bin/env perl
use Modern::Perl;
use t::lib::Mocks;
use Test::More;
use Test::MockModule;
use Module::Load::Conditional qw( can_load );
plan tests => 3;
SKIP: {
skip "cannot find WebService::ILS::RecordedBooks::Partner", 5
unless can_load( modules => { 'WebService::ILS::RecordedBooks::Patron' => undef } );
use_ok('Koha::ExternalContent::RecordedBooks');
t::lib::Mocks::mock_preference('SessionStorage','tmp');
t::lib::Mocks::mock_preference('RecordedBooksLibraryID', 'DUMMY');
t::lib::Mocks::mock_preference('RecordedBooksClientSecret', 'DUMMY');
t::lib::Mocks::mock_preference('RecordedBooksDomain', 'DUMMY');
my $client = Koha::ExternalContent::RecordedBooks->new();
local $@;
eval { $client->search({query => "art"}) };
ok($@ =~ /not authorized/, "Invalid RecordedBooks partner credentials");
SKIP: {
skip "no RecordedBooks partner credentials", 1 unless $ENV{RECORDEDBOOKS_TEST_LIBRARY_ID};
t::lib::Mocks::mock_preference('RecordedBooksLibraryID', $ENV{RECORDEDBOOKS_TEST_LIBRARY_ID});
t::lib::Mocks::mock_preference('RecordedBooksClientSecret', $ENV{RECORDEDBOOKS_TEST_CLIENT_SECRET});
t::lib::Mocks::mock_preference('RecordedBooksDomain', $ENV{RECORDEDBOOKS_TEST_DOMAIN});
$client = Koha::ExternalContent::RecordedBooks->new();
my $res = $client->search({query => "art"});
ok($res->{items}, "search")
}
}