diff --git a/R/plot_annotation.R b/R/plot_annotation.R index 6f53f2f..47c8509 100644 --- a/R/plot_annotation.R +++ b/R/plot_annotation.R @@ -86,16 +86,21 @@ plot_annotation <- function(title = waiver(), subtitle = waiver(), caption = wai theme = th ), class = 'plot_annotation') } -default_annotation <- plot_annotation( - title = NULL, - subtitle = NULL, - caption = NULL, - tag_levels = character(), - tag_prefix = '', - tag_suffix = '', - tag_sep = '', - theme = NULL -) + +default_annotation <- NULL +on_load({ + default_annotation <- plot_annotation( + title = NULL, + subtitle = NULL, + caption = NULL, + tag_levels = character(), + tag_prefix = '', + tag_suffix = '', + tag_sep = '', + theme = NULL + ) +}) + #' @importFrom utils modifyList #' @export ggplot_add.plot_annotation <- function(object, plot, object_name) {