Fix output type detection in .onLoad

Fixes R 4.3 compatibility and resolves haozhu233#750
kupietz · Apr 25, 2023 · 5cd02b3 · 5cd02b3
1 parent 292f607
commit 5cd02b3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/zzz.R b/R/zzz.R
@@ -21,7 +21,7 @@
   auto_format <- getOption("kableExtra.auto_format", default = TRUE)
   if (auto_format) auto_set_format()
   if (!is.null(rmarkdown::metadata$output) &&
-      rmarkdown::metadata$output %in% c(
+      names(rmarkdown::metadata$output)[1] %in% c(
         "ioslides_presentation", "slidy_presentation",
         "gitbook", "bookdown::gitbook", "radix_article", "radix::radix_article",
         "distill_article", "distill::distill_article"