From e727e2bdc9407a9bbc732dd283f41aec70a3a253 Mon Sep 17 00:00:00 2001
From: Teun van den Brand <49372158+teunbrand@users.noreply.github.com>
Date: Thu, 27 Feb 2025 10:14:28 +0100
Subject: [PATCH] don't warn when fatten is absent (#6310)

---
 R/geom-crossbar.R   | 2 +-
 R/geom-pointrange.R | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/geom-crossbar.R b/R/geom-crossbar.R
index 8f9d8ccd74..f1db25bab9 100644
--- a/R/geom-crossbar.R
+++ b/R/geom-crossbar.R
@@ -60,7 +60,7 @@ geom_crossbar <- function(mapping = NULL, data = NULL,
 #' @export
 GeomCrossbar <- ggproto("GeomCrossbar", Geom,
   setup_params = function(data, params) {
-    if (lifecycle::is_present(params$fatten)) {
+    if (lifecycle::is_present(params$fatten %||% deprecated())) {
       deprecate_soft0(
         "3.6.0", "geom_crossbar(fatten)",
         "geom_crossbar(middle.linewidth)"
diff --git a/R/geom-pointrange.R b/R/geom-pointrange.R
index 1943bb4f4c..c13b6a813e 100644
--- a/R/geom-pointrange.R
+++ b/R/geom-pointrange.R
@@ -42,7 +42,7 @@ GeomPointrange <- ggproto("GeomPointrange", Geom,
   required_aes = c("x", "y", "ymin|xmin", "ymax|xmax"),
 
   setup_params = function(data, params) {
-    if (lifecycle::is_present(params$fatten)) {
+    if (lifecycle::is_present(params$fatten %||% deprecated())) {
       deprecate_soft0("3.6.0", "geom_pointrange(fatten)", I("the `size` aesthetic"))
     } else {
       # For backward compatibility reasons