support action::namespace for netdisco-do
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user