protect if-clause

tidyverse · Jan 23, 2025 · 7868d9f · 7868d9f
1 parent 97edd62
commit 7868d9f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/geom-ribbon.R b/R/geom-ribbon.R
@@ -132,7 +132,7 @@ GeomRibbon <- ggproto("GeomRibbon", Geom,
       strsplit(self$required_aes, "|", fixed = TRUE),
       `[[`, i = 1, character(1)
     )
-    if (params$flipped_aes || any(data$flipped_aes) %||% FALSE) {
+    if (isTRUE(params$flipped_aes || any(data$flipped_aes) %||% FALSE)) {
       vars <- switch_orientation(vars)
     }
     vars <- c(vars, self$non_missing_aes)