From 641f8d62df2d7ba0e80f3c8d78c3f8185dcf7048 Mon Sep 17 00:00:00 2001
From: Jelmer Vernooij <jelmer@samba.org>
Date: Wed, 13 May 2009 19:57:58 +0200
Subject: Support reporting current time in selftest output.

---
 selftest/output/subunit.pm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'selftest/output/subunit.pm')

diff --git a/selftest/output/subunit.pm b/selftest/output/subunit.pm
index 720fe7285c..e99b76c1b9 100644
--- a/selftest/output/subunit.pm
+++ b/selftest/output/subunit.pm
@@ -33,6 +33,13 @@ sub new($) {
 	bless($self, $class);
 }
 
+sub report_time($$)
+{
+	my ($self, $time) = @_;
+	my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($time);
+	printf "time: %04d-%02d-%02d %02d:%02d:%02dZ\n", $year+1900, $mon, $mday, $hour, $min, $sec;
+}
+
 sub start_testsuite($$)
 {
 	my ($self, $name) = @_;
-- 
cgit