From 4b11ac6fa60d59126b10f4b7b7cf1f7dd293cbdf Mon Sep 17 00:00:00 2001
From: Teun van den Brand <tahvdbrand@gmail.com>
Date: Thu, 13 Jun 2024 10:00:56 +0200
Subject: [PATCH] setup sides parameter in `geom_rug()`

---
 R/geom-rug.R | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/R/geom-rug.R b/R/geom-rug.R
index a1273e3e08..eca79951d8 100644
--- a/R/geom-rug.R
+++ b/R/geom-rug.R
@@ -159,6 +159,11 @@ GeomRug <- ggproto("GeomRug", Geom,
 
   rename_size = TRUE,
 
+  setup_params = function(data, params) {
+    params$sides <- params$sides %||% "bl"
+    params
+  },
+
   handle_na = function(self, data, params) {
     sides_aes <- character()