diff --git a/R/aes.R b/R/aes.R
index 4120657222..38fa9bf63c 100644
--- a/R/aes.R
+++ b/R/aes.R
@@ -208,6 +208,9 @@ standardise_aes_symbols <- function(x) {
 
   # Don't walk through function heads
   x[-1] <- lapply(x[-1], standardise_aes_symbols)
+  if (is_call(x, "stage", ns = "ggplot2")) {
+    x[[1]] <- call("stage")[[1]]
+  }
 
   x
 }