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

Bug 21073: (QA follow-up) Add ->is_enabled and tests

Browse source 
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Tomás Cohen Arazi 2019-06-17 08:06:23 -03:00 committed by Martin Renvoize
parent 81186ea269
commit 22aa6ecd47
Signed by: martin.renvoize
GPG key ID: 422B469130441A0F
2 changed files with 38 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
Koha/Plugins/Base.pm
View file

@ -272,6 +272,20 @@ sub _version_compare {
return 0;
}
=head2 is_enabled
Method that returns wether the plugin is enabled or not
$plugin->enable
=cut
sub is_enabled {
my ($self) = @_;
return $self->retrieve_data( '__ENABLED__' );
}
=head2 enable
Method for enabling plugin

25
t/db_dependent/Plugins.t
View file

@ -23,7 +23,7 @@ use File::Temp qw( tempdir tempfile );
use FindBin qw($Bin);
use Module::Load::Conditional qw(can_load);
use Test::MockModule;
use Test::More tests => 50;
use Test::More tests => 51;
use C4::Context;
use Koha::Database;
@ -109,6 +109,29 @@ subtest 'Version upgrade tests' => sub {
$schema->storage->txn_rollback;
};
subtest 'is_enabled() tests' => sub {
plan tests => 3;
$schema->storage->txn_begin;
# Make sure there's no previous installs or leftovers on DB
Koha::Plugins::Methods->delete;
$schema->resultset('PluginData')->delete;
my $plugin = Koha::Plugin::Test->new({ enable_plugins => 1, cgi => CGI->new });
ok( $plugin->is_enabled, 'Plugins enabled by default' );
# disable
$plugin->disable;
ok( !$plugin->is_enabled, 'Calling ->disable disables the plugin' );
# enable
$plugin->enable;
ok( $plugin->is_enabled, 'Calling ->enable enabled the plugin' );
$schema->storage->txn_rollback;
};
$schema->storage->txn_begin;
Koha::Plugins::Methods->delete;