From 0ee073a79c22bbe5b62ac505d0c0b953c387c1c0 Mon Sep 17 00:00:00 2001
From: Teun van den Brand <tahvdbrand@gmail.com>
Date: Mon, 16 Sep 2024 16:05:33 +0200
Subject: [PATCH] unnamespace `stage()` calls

---
 R/aes.R | 3 +++
 1 file changed, 3 insertions(+)

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
 }