Merge branch 'main' of github.com:jtlandis/ggside into main

jtlandis · Dec 9, 2023 · 930f6bf · 930f6bf
2 parents 78eaf26 + 09dfac2
commit 930f6bf
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/plot-construction.R b/R/plot-construction.R
@@ -47,7 +47,7 @@ update_ggside.ggplot <- function(object, ggside = NULL){
   object$ggside$collapse <- ggside$collapse %||% object$ggside$collapse %||% NULL
   fp <- object[['facet']]$params
   col <- object$ggside$collapse
-  if (!is.null(fp$free) && !is.null(col) && any(.lgl <- vapply(fp$free, identity, logical(1)))) {
+  if (!is.null(fp$free) && !is.null(col) && inherits(object[['facet']], "FacetWrap") && any(.lgl <- vapply(fp$free, identity, logical(1)))) {
     # if ggside collapse all - but scales is free - prioritize the scale and dont
     # collapse
     # i.e. facet_wrap(..., scales='free_y') + ggside(collapse="y") --> warning

diff --git a/man/geom_xsidelabel.Rd b/man/geom_xsidelabel.Rd