tests/testthat/_snaps/StatsandGeoms.md

We do not need to update silent_add().

Code
  body
Output
  {
      if (is.null(scale)) {
          return()
      }
      prev_aes <- self$find(scale$aesthetics)
      if (any(prev_aes)) {
          scalename <- self$scales[prev_aes][[1]]$aesthetics[1]
          cli::cli_inform(c("Scale for {.field {scalename}} is already present.", 
              "Adding another scale for {.field {scalename}}, which will replace the existing scale."))
      }
      self$scales <- c(self$scales[!prev_aes], list(scale))
  }


malcolmbarrett/ggdag documentation built on March 8, 2024, 5:49 p.m.