include last_defer timestamp when deferring a job

lib/App/Netdisco/DB.pm

@@ -11,7 +11,7 @@ __PACKAGE__->load_namespaces(
 );
 
 our # try to hide from kwalitee
-  $VERSION = 42; # schema version used for upgrades, keep as integer
+  $VERSION = 43; # schema version used for upgrades, keep as integer
 
 use Path::Class;
 use File::ShareDir 'dist_dir';

lib/App/Netdisco/DB/Result/DeviceSkip.pm

@@ -14,9 +14,11 @@ __PACKAGE__->add_columns(
   "device",
   { data_type => "inet", is_nullable => 0 },
   "actionset",
-  { data_type => "text[]", is_nullable => 0, default_value => '{}' },
+  { data_type => "text[]", is_nullable => 1, default_value => '{}' },
   "deferrals",
   { data_type => "integer", is_nullable => 1, default_value => '0' },
+  "last_defer",
+  { data_type => "timestamp", is_nullable => 1 },
 );
 
 __PACKAGE__->set_primary_key("backend", "device");
@@ -36,7 +38,10 @@ There is a race in the update, but this is not worrying for now.
 sub increment_deferrals {
   my $row = shift;
   return unless $row->in_storage;
-  return $row->update({ deferrals => (($row->deferrals || 0) + 1) });
+  return $row->update({
+    deferrals => (($row->deferrals || 0) + 1),
+    last_defer => \'now()',
+  });
 }
 
 =head2 add_to_actionset

share/schema_versions/App-Netdisco-DB-42-43-PostgreSQL.sql

@@ -0,0 +1,5 @@
+BEGIN;
+
+ALTER TABLE "device_skip" ADD "last_defer" timestamp;
+
+COMMIT;