fix misplaced parenthesis

teunbrand · teunbrand · commit 3c571b11adb2 · 2023-12-22T12:57:10.000+01:00
diff --git a/R/scale-continuous.R b/R/scale-continuous.R
@@ -205,6 +205,6 @@ scale_override_call <- function(call = NULL) {
   if (is.null(call) || is.function(call[[1]])) {
     return(TRUE)
   }
-  !any(startsWith(as.character(call[[1]])), "scale_")
+  !any(startsWith(as.character(call[[1]]), "scale_"))
 }
 

Original file line number	Diff line number	Diff line change
`@@ -205,6 +205,6 @@ scale_override_call <- function(call = NULL) {`
`205`	`205`	`if (is.null(call) \|\| is.function(call[[1]])) {`
`206`	`206`	`return(TRUE)`
`207`	`207`	`}`
`208`		`- !any(startsWith(as.character(call[[1]])), "scale_")`
	`208`	`+ !any(startsWith(as.character(call[[1]]), "scale_"))`
`209`	`209`	`}`
`210`	`210`