[OSSTEST PATCH 1/6] show_abs_time: break out from sg-report-flight

[Ian Jackson <ian.jackson@eu.citrix.com>]

No functional change.

Signed-off-by: Ian Jackson <ian.jackson@eu.citrix.com>
---
 Osstest.pm       |    7 ++++++-
 sg-report-flight |    4 +---
 2 files changed, 7 insertions(+), 4 deletions(-)

diff --git a/Osstest.pm b/Osstest.pm
index 1033dd1..fc9698b 100644
--- a/Osstest.pm
+++ b/Osstest.pm
@@ -35,7 +35,7 @@ BEGIN {
                       $dbh_tests db_retry db_retry_retry db_retry_abort
                       db_begin_work
                       ensuredir get_filecontents_core_quiet system_checked
-                      nonempty visible_undef
+                      nonempty visible_undef show_abs_time
                       );
     %EXPORT_TAGS = ( );
 
@@ -286,4 +286,9 @@ sub visible_undef ($) {
     return defined $v ? $v : '<undef>';
 }
 
+sub show_abs_time ($) {
+    my ($timet) = @_;
+    return strftime "%Y-%m-%d %H:%M:%S Z", gmtime $timet;
+}
+
 1;
diff --git a/sg-report-flight b/sg-report-flight
index 69ef252..e6f3339 100755
--- a/sg-report-flight
+++ b/sg-report-flight
@@ -808,9 +808,7 @@ END
             encode_entities($st);
         $issteplog{$logfilename}= 1;
 
-        printf H "<td>%s</td>",
-            encode_entities(strftime "%Y-%m-%d %H:%M:%S Z",
-                            gmtime $step->{started});
+        printf H "<td>%s</td>", show_abs_time $step->{started};
 
 	if (defined $step->{finished} && defined $step->{started}) {
 	    printf H "<td align=right>%d</td>\n",
-- 
1.7.10.4