Remove extra space

Author: hadley

R/expect-comparison.R

@@ -44,7 +44,7 @@ expect_compare_ <- function(
   if (!isTRUE(cmp)) {
     digits <- min_digits(act$val, exp$val)
     msg <- sprintf(
-      "%s is %s %s. \n%s - %s = %s %s 0",
+      "%s is %s %s.\n%s - %s = %s %s 0",
       act$lab,
       msg,
       exp$lab,

tests/testthat/_snaps/expect-comparison.md

@@ -1,10 +1,10 @@
 # useful output when numbers are very small
 
-    1.1 * x is not less than `x`. 
+    1.1 * x is not less than `x`.
     0.0000110 - 0.0000100 = 0.0000010 >= 0
 
 ---
 
-    `x` is not strictly greater than 1.1 * x. 
+    `x` is not strictly greater than 1.1 * x.
     0.0000100 - 0.0000110 = -0.0000010 < 0