diff --git a/R/label-compose.R b/R/label-compose.R index 955a2244..d324c069 100644 --- a/R/label-compose.R +++ b/R/label-compose.R @@ -39,7 +39,7 @@ compose_label <- function(..., call = caller_env()) { orig <- x for (labeller in label_list) { x <- labeller(x) - attr(x, "orig") <- orig + attr(x, "orig_breaks") <- orig } x[is.na(orig)] <- NA names(x) <- names(x) %||% names(orig)