fix bug

teunbrand · teunbrand · commit c1781e4952b0 · 2024-10-18T11:53:13.000+02:00
diff --git a/R/scale-.R b/R/scale-.R
@@ -319,7 +319,7 @@ binned_scale <- function(aesthetics, scale_name = deprecated(), palette, name =
   }
 
   transform <- as.transform(transform)
-  if (!is.null(limits)) {
+  if (!is.null(limits) && !is.function(limits)) {
     limits <- transform$transform(limits)
   }
 

Original file line number	Diff line number	Diff line change
`@@ -319,7 +319,7 @@ binned_scale <- function(aesthetics, scale_name = deprecated(), palette, name =`
`319`	`319`	`}`
`320`	`320`
`321`	`321`	`transform <- as.transform(transform)`
`322`		`- if (!is.null(limits)) {`
	`322`	`+ if (!is.null(limits) && !is.function(limits)) {`
`323`	`323`	`limits <- transform$transform(limits)`
`324`	`324`	`}`
`325`	`325`