Lines 3-13
use Modern::Perl;
Link Here
|
3 |
use t::lib::Mocks; |
3 |
use t::lib::Mocks; |
4 |
use Test::More tests => 5; # last test to print |
4 |
use Test::More tests => 5; # last test to print |
5 |
|
5 |
|
6 |
local $@; |
6 |
use Module::Load::Conditional qw( can_load ); |
7 |
eval { require WebService::ILS::OverDrive::Patron; } |
7 |
|
8 |
or diag($@); |
|
|
9 |
SKIP: { |
8 |
SKIP: { |
10 |
skip "cannot filnd WebService::ILS::OverDrive::Patron", 5 if $@; |
9 |
skip "cannot find WebService::ILS::OverDrive::Patron", 5 |
|
|
10 |
unless can_load( modules => { 'WebService::ILS::OverDrive::Patron' => undef } ); |
11 |
|
11 |
|
12 |
use_ok('Koha::ExternalContent::OverDrive'); |
12 |
use_ok('Koha::ExternalContent::OverDrive'); |
13 |
|
13 |
|
14 |
- |
|
|