Koha::Plugins::Methods->search({ plugin_class => $plugin_class })->delete();
- foreach my $method ( @{ Class::Inspector->methods($plugin_class) } ) {
+ foreach my $method ( @{ Class::Inspector->methods( $plugin_class, 'public' ) } ) {
Koha::Plugins::Method->new(
{
plugin_class => $plugin_class,
use FindBin qw($Bin);
use Module::Load::Conditional qw(can_load);
use Test::MockModule;
-use Test::More tests => 49;
+use Test::More tests => 50;
use C4::Context;
use Koha::Database;
Koha::Plugins->new( { enable_plugins => 1 } )->InstallPlugins();
ok( Koha::Plugins::Methods->search( { plugin_class => 'Koha::Plugin::Test' } )->count, 'Test plugin methods added to database' );
+is( Koha::Plugins::Methods->search({ plugin_class => 'Koha::Plugin::Test', plugin_method => '_private_sub' })->count, 0, 'Private methods are skipped' );
my $mock_plugin = Test::MockModule->new( 'Koha::Plugin::Test' );
$mock_plugin->mock( 'test_template', sub {
is( ref($result), 'Koha::Plugins', 'calling new with enable_plugins makes it override the config' );
};
-$schema->storage->txn_rollback;
\ No newline at end of file
+$schema->storage->txn_rollback;