From 3f65457d360a2aef4c0692fea3f00a1123055a07 Mon Sep 17 00:00:00 2001 From: Trevor L Davis Date: Thu, 25 Nov 2021 10:02:38 -0800 Subject: [PATCH] test: Fix Rscript test --- tests/testthat/test-argparse.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/testthat/test-argparse.R b/tests/testthat/test-argparse.R index a2ca5be..3363179 100644 --- a/tests/testthat/test-argparse.R +++ b/tests/testthat/test-argparse.R @@ -324,6 +324,6 @@ test_that("Paths that quit()", { help <- system2(cmd, c("scripts/test_help.R", "--help"), stdout = TRUE, stderr = TRUE) - expect_equal("usage: scripts/test_help.R [-h]", help[2]) - expect_equal(" -h, --help show this help message and exit", help[5]) + expect_equal("usage: scripts/test_help.R [-h]", help[1]) + expect_equal(" -h, --help show this help message and exit", help[4]) })