Fallback to default theme if none is detected (#678)

rstudio · Jul 14, 2023 · 494923b · 494923b
1 parent 5c74f4c
commit 494923b
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/utils-deps.R b/R/utils-deps.R
@@ -41,7 +41,10 @@ component_dependency_sass_ <- function(theme, name) {
 
   bs_dependency(
     input = lapply(scss_files, sass_file),
-    theme = theme,
+    # At least currently, when statically rendering a component, 
+    # bs_dependency_defer() passes along a NULL theme. We should 
+    # eventually fix that, but for now, fall back to the default theme
+    theme = theme %||% bs_theme(),
     name = paste0("bslib-", name, "-styles"),
     version = get_package_version("bslib"),
     cache_key_extra = get_package_version("bslib"),