|
Lines 32-37
use POSIX qw(getpid);
Link Here
|
| 32 |
use C4::Context; |
32 |
use C4::Context; |
| 33 |
use C4::Output; |
33 |
use C4::Output; |
| 34 |
|
34 |
|
|
|
35 |
use Koha::Config; |
| 35 |
use Koha::Cache::Memory::Lite; |
36 |
use Koha::Cache::Memory::Lite; |
| 36 |
use Koha::Exceptions; |
37 |
use Koha::Exceptions; |
| 37 |
use Koha::Exceptions::Plugin; |
38 |
use Koha::Exceptions::Plugin; |
|
Lines 41-47
use Koha::Plugins::Methods;
Link Here
|
| 41 |
use constant ENABLED_PLUGINS_CACHE_KEY => 'enabled_plugins'; |
42 |
use constant ENABLED_PLUGINS_CACHE_KEY => 'enabled_plugins'; |
| 42 |
|
43 |
|
| 43 |
BEGIN { |
44 |
BEGIN { |
| 44 |
my $pluginsdir = C4::Context->config("pluginsdir"); |
45 |
my $pluginsdir = Koha::Config->get_instance->get("pluginsdir"); |
| 45 |
my @pluginsdir = ref($pluginsdir) eq 'ARRAY' ? @$pluginsdir : $pluginsdir; |
46 |
my @pluginsdir = ref($pluginsdir) eq 'ARRAY' ? @$pluginsdir : $pluginsdir; |
| 46 |
push @INC, array_minus( @pluginsdir, @INC ); |
47 |
push @INC, array_minus( @pluginsdir, @INC ); |
| 47 |
pop @INC if $INC[-1] eq '.'; |
48 |
pop @INC if $INC[-1] eq '.'; |
| 48 |
- |
|
|