support action::namespace for netdisco-do

This commit is contained in:
Oliver Gorwits
2017-11-23 22:16:50 +00:00
parent 0bb15f36b9
commit 3db242cbe8
3 changed files with 19 additions and 2 deletions

View File

@@ -14,6 +14,7 @@ foreach my $slot (qw/
device
port
action
only_namespace
subaction
status
username
@@ -36,6 +37,15 @@ has '_statuslist' => (
default => sub { [] },
);
sub BUILD {
my ($job, $args) = @_;
if ($job->action =~ m/^(\w+)::(\w+)$/i) {
$job->action($1);
$job->only_namespace($2);
}
}
=head1 METHODS
=head2 summary