TESTS: cut'n'paste mistake

HenrikBengtsson · HenrikBengtsson · commit 24aa23b04fed · 2026-03-12T08:58:02.000-07:00
diff --git a/inst/testme/test-cli.R b/inst/testme/test-cli.R
@@ -30,7 +30,7 @@ stopifnot(
   is.numeric(args[["num"]]), args[["num"]]  == 3.14,
   is.logical(args[["logical"]]), args[["logical"]] == TRUE,
   is.character(args[["name"]]), args[["name"]] == "abc",
-  is.numeric(args[["num"]]), args[["expr"]] == "3"
+  is.numeric(args[["expr"]]), args[["expr"]] == 3
 )
 
 cmdargs <- c("--int=42", "--num=3.14", "--logical=TRUE", "--name=abc")

Original file line number	Diff line number	Diff line change
`@@ -30,7 +30,7 @@ stopifnot(`
`30`	`30`	`is.numeric(args[["num"]]), args[["num"]] == 3.14,`
`31`	`31`	`is.logical(args[["logical"]]), args[["logical"]] == TRUE,`
`32`	`32`	`is.character(args[["name"]]), args[["name"]] == "abc",`
`33`		`- is.numeric(args[["num"]]), args[["expr"]] == "3"`
	`33`	`+ is.numeric(args[["expr"]]), args[["expr"]] == 3`
`34`	`34`	`)`
`35`	`35`
`36`	`36`	`cmdargs <- c("--int=42", "--num=3.14", "--logical=TRUE", "--name=abc")`