worker roles in Role namespace

This commit is contained in:
Oliver Gorwits
2017-09-04 20:33:20 +01:00
parent 3099eda393
commit 1c2cf924bc
4 changed files with 4 additions and 4 deletions

View File

@@ -74,7 +74,7 @@ sub _mk_wkr {
# post-fork, become manager, scheduler, poller, etc
Role::Tiny->apply_roles_to_object(
$self => "App::Netdisco::Backend::Worker::$role");
$self => "App::Netdisco::Backend::Role::$role");
$self->worker_begin if $self->can('worker_begin');
$self->worker_body;

View File

@@ -1,4 +1,4 @@
package App::Netdisco::Backend::Worker::Manager;
package App::Netdisco::Backend::Role::Manager;
use Dancer qw/:moose :syntax :script/;

View File

@@ -1,4 +1,4 @@
package App::Netdisco::Backend::Worker::Poller;
package App::Netdisco::Backend::Role::Poller;
use Dancer qw/:moose :syntax :script/;

View File

@@ -1,4 +1,4 @@
package App::Netdisco::Backend::Worker::Scheduler;
package App::Netdisco::Backend::Role::Scheduler;
use Dancer qw/:moose :syntax :script/;