Suppress unneeded output from image comparison

c.f. ImageMagick/ImageMagick#884
daqana · Jan 12, 2020 · ac2bd16 · ac2bd16
1 parent 7acf33d
commit ac2bd16
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/helper_graphics.R b/tests/testthat/helper_graphics.R
@@ -131,7 +131,7 @@ compare_graph <- function(graph_name, tags) {
   # Normalize and quote some paths in case we are running on Windows
   compare_output <- file.path(test_work_dir, paste0(graph_name, "_diff.png"))
   command_line <- paste(
-    shQuote(compare_cmd), "-density 300", "-metric AE",
+    shQuote(compare_cmd), "-density 300", "-metric AE", "-quiet",
     shQuote(test_output), shQuote(standard_graph), shQuote(compare_output),
     "2>&1 | awk '{metric=$NF};END{print metric}'"
   )