From 58b4cc2a5a7a23e474ca30fd105d9c54d3143bfd Mon Sep 17 00:00:00 2001
From: mitchelloharawild <mitch.ohara-wild@monash.edu>
Date: Sat, 2 Mar 2024 18:05:29 +1100
Subject: [PATCH] Rework ggdist::ramp_colours for version namespacing issues
 Ref #397

---
 R/plot.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/plot.R b/R/plot.R
index 7c3c7eaf..9cee122e 100644
--- a/R/plot.R
+++ b/R/plot.R
@@ -319,7 +319,7 @@ build_fbl_layer <- function(object, data = NULL, level = c(80, 95),
     # Apply ramped fill
     if (!is.null(data[["fill_ramp"]])) {
       if (utils::packageVersion("ggdist") > "3.3.1") {
-        data$fill <- ggdist::ramp_colours(data$fill, data$fill_ramp)
+        data$fill <- get("ramp_colours", asNamespace("ggdist"), mode = "function")(data$fill, data$fill_ramp)
       } else {
         data$fill <- mapply(function(color, amount){
           (scales::seq_gradient_pal(attr(amount, "from") %||% "white", color))(amount %||% NA)