strip srcref from constructor expr

yjunechoe · yjunechoe · commit 730880ed615e · 2025-05-21T15:11:00.000-04:00
diff --git a/R/layer.R b/R/layer.R
@@ -181,6 +181,7 @@ layer <- function(geom = NULL, stat = NULL,
   geom <- set_draw_key(geom, key_glyph %||% params$key_glyph)
 
   fr_call <- layer_class$constructor %||% frame_call(call_env) %||% current_call()
+  attr(fr_call, "srcref") <- NULL
 
   ggproto("LayerInstance", layer_class,
     constructor = fr_call,
