Lines 45-53
my @plugins = Koha::Plugins->new({ enable_plugins => 1 })->GetPlugins( 'report'
Link Here
|
45 |
ok( $plugins[0]->get_metadata()->{'name'} eq 'Test Plugin', "Koha::Plugins::GetPlugins functions correctly" ); |
45 |
ok( $plugins[0]->get_metadata()->{'name'} eq 'Test Plugin', "Koha::Plugins::GetPlugins functions correctly" ); |
46 |
|
46 |
|
47 |
SKIP: { |
47 |
SKIP: { |
48 |
skip "plugindir not set", 3 unless C4::Context->config("pluginsdir"); |
|
|
49 |
|
50 |
my $plugins_dir = C4::Context->config("pluginsdir"); |
48 |
my $plugins_dir = C4::Context->config("pluginsdir"); |
|
|
49 |
skip "plugindir not set", 3 unless defined $plugins_dir; |
50 |
skip "plugindir not writable", 3 unless -w $plugins_dir; |
51 |
skip "KitchenSink plugin already installed", 3 if (-f "$plugins_dir/Koha/Plugin/Com/ByWaterSolutions/KitchenSink.pm"); |
52 |
|
51 |
my $ae = Archive::Extract->new( archive => "$Bin/KitchenSinkPlugin.kpz", type => 'zip' ); |
53 |
my $ae = Archive::Extract->new( archive => "$Bin/KitchenSinkPlugin.kpz", type => 'zip' ); |
52 |
unless ( $ae->extract( to => $plugins_dir ) ) { |
54 |
unless ( $ae->extract( to => $plugins_dir ) ) { |
53 |
warn "ERROR: " . $ae->error; |
55 |
warn "ERROR: " . $ae->error; |
54 |
- |
|
|