Close #82: Account for the fact that element_blank() elements are len…

…gth 0, but should be considered defined
rstudio · Feb 1, 2021 · 820d464 · 820d464
1 parent 45454fa
commit 820d464
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/ggplot.R b/R/ggplot.R
@@ -269,10 +269,10 @@ resolve_theme_inheritance <- function(p_theme) {
       parent_el <- p_theme[[this_parent]]
       kid_el <- p_theme[[this_kid]]
       # parent doesn't exist so do nothing
-      if (!length(parent_el)) {
+      if (is.null(parent_el)) {
         next
       }
-      p_theme[[this_kid]] <- if (length(kid_el)) {
+      p_theme[[this_kid]] <- if (!is.null(kid_el)) {
         # both parent & child exist
         ggplot2::merge_element(new = kid_el, old = parent_el)
       } else {