|
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 filnd 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 |
- |
|
|