One more thinko

HenrikBengtsson · HenrikBengtsson · commit 191469b54bbd · 2025-12-30T16:47:59.000-08:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: parallelly
-Version: 1.46.0-9007
+Version: 1.46.0-9008
 Title: Enhancing the 'parallel' Package
 Imports:
     parallel,
diff --git a/R/utils.R b/R/utils.R
@@ -118,7 +118,7 @@ inRCmdVignette <- function() {
   args <- commandArgs()
   if (length(args) != 6) return(FALSE)
   truth <- c(r_cmd, "--no-echo", "--no-restore", "--vanilla", "-e", "tools::buildVignettes(dir~+~=~+~'.',~+~tangle~+~=~+~TRUE)")
-  any(args == truth)
+  all(args == truth)
 }
 
 commaq <- function(x, sep = ", ") paste(sQuote(x), collapse = sep)

Original file line number	Diff line number	Diff line change
`@@ -118,7 +118,7 @@ inRCmdVignette <- function() {`
`118`	`118`	`args <- commandArgs()`
`119`	`119`	`if (length(args) != 6) return(FALSE)`
`120`	`120`	`truth <- c(r_cmd, "--no-echo", "--no-restore", "--vanilla", "-e", "tools::buildVignettes(dir~+~=~+~'.',~+~tangle~+~=~+~TRUE)")`
`121`		`- any(args == truth)`
	`121`	`+ all(args == truth)`
`122`	`122`	`}`
`123`	`123`
`124`	`124`	`commaq <- function(x, sep = ", ") paste(sQuote(x), collapse = sep)`