From 0a1dbf353dc9cf1e0202e013fa112f177cbf51cf Mon Sep 17 00:00:00 2001 From: Jelmer Vernooij Date: Wed, 3 Jun 2009 17:39:54 +0200 Subject: [PATCH] subunit: Support the time: command. --- selftest/Subunit.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/selftest/Subunit.pm b/selftest/Subunit.pm index 19af636d0ba..fc1a3d1d97d 100644 --- a/selftest/Subunit.pm +++ b/selftest/Subunit.pm @@ -15,6 +15,7 @@ # along with this program. If not, see . package Subunit; +use POSIX; require Exporter; @ISA = qw(Exporter); @@ -36,6 +37,8 @@ sub parse_results($$$$$) $msg_ops->control_msg($_); $msg_ops->start_test($open_tests, $1); push (@$open_tests, $1); + } elsif (/^time: (\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)Z\n/) { + $msg_ops->report_time(mktime($6, $5, $4, $3, $2, $1)); } elsif (/^(success|successful|failure|skip|knownfail|error): (.*?)( \[)?([ \t]*)\n/) { $msg_ops->control_msg($_); my $reason = undef; -- 2.34.1