fix typo

teunbrand · teunbrand · commit 84dcb5bf7b47 · 2025-06-09T12:40:29.000+02:00
diff --git a/R/plot-construction.R b/R/plot-construction.R
@@ -82,7 +82,7 @@ S7::method(`+`, list(class_theme, S7::class_any)) <- function(e1, e2) {
   if (getRversion() >= "4.3.0") {
     deprecate_soft0("4.0.0", I("<ggplot> %+% x"), I("<ggplot> + x"))
   }
-  agg_gg(e1, e2)
+  add_gg(e1, e2)
 }
 
 add_ggplot <- function(p, object, objectname) {

Original file line number	Diff line number	Diff line change
@@ -82,7 +82,7 @@ S7::method(`+`, list(class_theme, S7::class_any)) <- function(e1, e2) {
`82`	`82`	`if (getRversion() >= "4.3.0") {`
`83`	`83`	`deprecate_soft0("4.0.0", I("<ggplot> %+% x"), I("<ggplot> + x"))`
`84`	`84`	`}`
`85`		`- agg_gg(e1, e2)`
	`85`	`+ add_gg(e1, e2)`
`86`	`86`	`}`
`87`	`87`
`88`	`88`	`add_ggplot <- function(p, object, objectname) {`