Output Junit timestamps in ISO 8601 and use all three decimal places (#…

…924)

* Output timestamps in ISO 8601

* There is an extra rounding step that is not needed

* Add note to NEWS

NEWS.md

@@ -1,6 +1,10 @@
 
 # testthat (development version)
 
+
+* JunitReporter now reports tests in ISO 8601 in the UTC timezone and also uses
+  the maximum 3 decimal place precision (#923).
+
 * New `exp_signal()` function. This is a condition signaller that
   implements the testthat protocol (signal with `stop()` if the
   expectation is broken, with a `continue_test` restart).

R/reporter-junit.R

@@ -44,7 +44,7 @@ JunitReporter <- R6::R6Class("JunitReporter",
     file_name = NULL,
 
     elapsed_time = function() {
-      time <- round((private$proctime() - self$timer)[["elapsed"]], 2)
+      time <- (private$proctime() - self$timer)[["elapsed"]]
       self$timer <- private$proctime()
       time
     },
@@ -153,7 +153,7 @@ JunitReporter <- R6::R6Class("JunitReporter",
       proc.time()
     },
     timestamp = function() {
-      toString(Sys.time())
+      strftime(Sys.time(), "%Y-%m-%dT%H:%M:%SZ", tz = "UTC")
     },
     hostname = function() {
       Sys.info()[["nodename"]]