class for skipping labels

teunbrand · teunbrand · commit e7f05ba9b638 · 2025-02-05T14:56:40.000+01:00
diff --git a/R/aes.R b/R/aes.R
@@ -360,7 +360,7 @@ aes_all <- function(vars) {
   # refer to the data mask
   structure(
     lapply(vars, function(x) new_quosure(as.name(x), emptyenv())),
-    class = "uneval"
+    class = c("unlabelled_uneval", "uneval")
   )
 }
 

Original file line number	Diff line number	Diff line change
`@@ -360,7 +360,7 @@ aes_all <- function(vars) {`
`360`	`360`	`# refer to the data mask`
`361`	`361`	`structure(`
`362`	`362`	`lapply(vars, function(x) new_quosure(as.name(x), emptyenv())),`
`363`		`- class = "uneval"`
	`363`	`+ class = c("unlabelled_uneval", "uneval")`
`364`	`364`	`)`
`365`	`365`	`}`
`366`	`366`