fix skip long SNMP timeout for initial discover

lib/App/Netdisco/Worker/Plugin/Internal/SNMPFastDiscover.pm

@@ -4,11 +4,15 @@ use Dancer ':syntax';
 use App::Netdisco::Worker::Plugin;
 use aliased 'App::Netdisco::Worker::Status';
 
+use Scalar::Util 'blessed';
+
 register_worker({ phase => 'check', driver => 'direct' }, sub {
   my ($job, $workerconf) = @_;
 
   # if the job is a queued job, and discover, and the first one...
-  if ($job->job and $job->action eq 'discover' and not $job->log) {
+  if ($job->job and $job->action eq 'discover' and not $job->log
+      and (not blessed $job->device or not $job->device->in_storage)) {
+
       config->{'snmp_try_slow_connect'} = false;
       debug sprintf '[%s] skipping long SNMP timeouts for initial discover',
         $job->device;