time to resolve in ticket search, RT#9327

diff --git a/rt/share/html/Callbacks/TimeToResolve/Elements/RT__Ticket/ColumnMap/Once b/rt/share/html/Callbacks/TimeToResolve/Elements/RT__Ticket/ColumnMap/Once
new file mode 100644 (file)
index 0000000..df5d29e
--- /dev/null
+++ b/rt/share/html/Callbacks/TimeToResolve/Elements/RT__Ticket/ColumnMap/Once
@@ -0,0 +1,13 @@
+<%init>
+$COLUMN_MAP->{'TimeToResolve'} = {
+  title     => 'Time to Resolve',
+  attribute => 'Resolved',
+  value     => sub { 
+    my $r = $_[0]->ResolvedObj or return '';
+    return $r->DiffAsString($_[0]->CreatedObj);
+  }
+};
+</%init>
+<%ARGS>
+$COLUMN_MAP => {}
+</%ARGS>

diff --git a/rt/share/html/Callbacks/TimeToResolve/Search/Elements/BuildFormatString/SetFieldsOnce b/rt/share/html/Callbacks/TimeToResolve/Search/Elements/BuildFormatString/SetFieldsOnce
new file mode 100644 (file)
index 0000000..54dcae0
--- /dev/null
+++ b/rt/share/html/Callbacks/TimeToResolve/Search/Elements/BuildFormatString/SetFieldsOnce
@@ -0,0 +1,8 @@
+<%init>
+my $i = 1;
+$i++ until ($i == scalar(@$Fields) or $Fields->[$i-1] =~ /^Resolved/);
+splice @$Fields, $i, 0, 'TimeToResolve';
+</%init>
+<%ARGS>
+$Fields => []
+</%ARGS>