diff options
| -rw-r--r-- | selftest/Subunit.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/selftest/Subunit.pm b/selftest/Subunit.pm index 19af636d0b..fc1a3d1d97 100644 --- a/selftest/Subunit.pm +++ b/selftest/Subunit.pm @@ -15,6 +15,7 @@ # along with this program. If not, see <http://www.gnu.org/licenses/>. 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; |