better check for missing -d on addpseudodevice

This commit is contained in:
Oliver Gorwits
2022-07-12 09:15:04 +01:00
parent 872a45bd9f
commit 0d3a066c38

View File

@@ -11,10 +11,13 @@ use NetAddr::IP::Lite ':lower';
register_worker({ phase => 'check' }, sub {
my ($job, $workerconf) = @_;
my $devip = $job->device->ip;
my $name = $job->extra;
my $ports = $job->port;
return Status->error('Missing or invalid device IP (-d).')
unless $job->device;
my $devip = $job->device->ip;
return Status->error('Missing or invalid device name (-e).')
unless $name
and $name =~ m/^[[:print:]]+$/