From f418b1c0819ac4f207ba3d0ee519af2279450b49 Mon Sep 17 00:00:00 2001
From: Oliver Gorwits <oliver@cpan.org>
Date: Tue, 13 Jun 2017 07:21:31 +0100
Subject: [PATCH] add last_defer stamp to timedoutdevices report

---
 lib/App/Netdisco/Web/Plugin/AdminTask/TimedOutDevices.pm | 4 ++++
 share/views/ajax/admintask/timedoutdevices.tt            | 2 ++
 2 files changed, 6 insertions(+)

diff --git a/lib/App/Netdisco/Web/Plugin/AdminTask/TimedOutDevices.pm b/lib/App/Netdisco/Web/Plugin/AdminTask/TimedOutDevices.pm
index 89fc63ab..079705a5 100644
--- a/lib/App/Netdisco/Web/Plugin/AdminTask/TimedOutDevices.pm
+++ b/lib/App/Netdisco/Web/Plugin/AdminTask/TimedOutDevices.pm
@@ -20,6 +20,10 @@ ajax '/ajax/content/admin/timedoutdevices' => require_role admin => sub {
       [{ -desc => 'deferrals' }, { -asc => [qw/device backend/] }]
     })->hri->all;
 
+    foreach my $row (@set) {
+      next unless defined $row->{last_defer};
+      $row->{last_defer} =~ s/\.\d+//;
+    }
     my $results = hostnames_resolve_async(\@set, [2,2,2]);
 
     content_type('text/html');
diff --git a/share/views/ajax/admintask/timedoutdevices.tt b/share/views/ajax/admintask/timedoutdevices.tt
index 77b8160b..9e08bdef 100644
--- a/share/views/ajax/admintask/timedoutdevices.tt
+++ b/share/views/ajax/admintask/timedoutdevices.tt
@@ -8,6 +8,7 @@
       <th class="nd_center-cell">Device</th>
       <th class="nd_center-cell">Device DNS</th>
       <th class="nd_center-cell">Failed Connections</th>
+      <th class="nd_center-cell">Last Retry</th>
     </tr>
   </thead>
   </tbody>
@@ -18,6 +19,7 @@
         href="[% uri_for('/search') %]?tab=node&q=[% row.device | uri %]">[% row.device | html_entity %]</a></td>
       <td class="nd_center-cell">[% row.dns | html_entity %]</td>
       <td class="nd_center-cell">[% row.deferrals | html_entity %]</td>
+      <td class="nd_center-cell">[% row.last_defer | html_entity %]</td>
     </tr>
     [% END %]
   </tbody>