Fix deprecation calls

thomasp85 · thomasp85 · commit 2663bb18977f · 2025-04-07T13:30:29.000+02:00
diff --git a/R/plot.R b/R/plot.R
@@ -167,7 +167,7 @@ is_ggplot <- function(x) inherits(x, "ggplot")
 #' @rdname is_tests
 #' @usage is.ggplot(x) # Deprecated
 is.ggplot <- function(x) {
-  deprecate_soft0("3.5.2", "is.ggplot", "is_ggplot")
+  deprecate_soft0("3.5.2", "is.ggplot()", "is_ggplot()")
   is_ggplot(x)
 }
 
diff --git a/R/theme.R b/R/theme.R
@@ -873,7 +873,7 @@ is_theme <- function(x) inherits(x, "theme")
 #' @rdname is_tests
 #' @usage is.theme(x) # Deprecated
 is.theme <- function(x) {
-  deprecate_soft0("3.5.2", "is.theme", "is_theme")
+  deprecate_soft0("3.5.2", "is.theme()", "is_theme()")
   is_theme(x)
 }
 

Original file line number	Diff line number	Diff line change
`@@ -167,7 +167,7 @@ is_ggplot <- function(x) inherits(x, "ggplot")`
`167`	`167`	`#' @rdname is_tests`
`168`	`168`	`#' @usage is.ggplot(x) # Deprecated`
`169`	`169`	`is.ggplot <- function(x) {`
`170`		`- deprecate_soft0("3.5.2", "is.ggplot", "is_ggplot")`
	`170`	`+ deprecate_soft0("3.5.2", "is.ggplot()", "is_ggplot()")`
`171`	`171`	`is_ggplot(x)`
`172`	`172`	`}`
`173`	`173`
Original file line number	Diff line number	Diff line change
`@@ -873,7 +873,7 @@ is_theme <- function(x) inherits(x, "theme")`
`873`	`873`	`#' @rdname is_tests`
`874`	`874`	`#' @usage is.theme(x) # Deprecated`
`875`	`875`	`is.theme <- function(x) {`
`876`		`- deprecate_soft0("3.5.2", "is.theme", "is_theme")`
	`876`	`+ deprecate_soft0("3.5.2", "is.theme()", "is_theme()")`
`877`	`877`	`is_theme(x)`
`878`	`878`	`}`
`879`	`879`