Added gg class to labs(). Fixes #5553.

phispu · phispu · commit fb9b4130e4a1 · 2024-08-15T14:21:20.000-07:00
diff --git a/R/labels.R b/R/labels.R
@@ -139,7 +139,7 @@ labs <- function(..., title = waiver(), subtitle = waiver(), caption = waiver(),
   args <- args[!duplicated(names(args))]
   args <- rename_aes(args)
 
-  structure(args, class = "labels")
+  structure(args, class = c("labels", "gg"))
 }
 
 #' @rdname labs

Original file line number	Diff line number	Diff line change
`@@ -139,7 +139,7 @@ labs <- function(..., title = waiver(), subtitle = waiver(), caption = waiver(),`
`139`	`139`	`args <- args[!duplicated(names(args))]`
`140`	`140`	`args <- rename_aes(args)`
`141`	`141`
`142`		`- structure(args, class = "labels")`
	`142`	`+ structure(args, class = c("labels", "gg"))`
`143`	`143`	`}`
`144`	`144`
`145`	`145`	`#' @rdname labs`