From 51c2e9469215844971e66b195c5e53db42aa1ad6 Mon Sep 17 00:00:00 2001
From: Dean Attali <daattali@gmail.com>
Date: Mon, 1 Aug 2022 17:46:49 -0400
Subject: [PATCH] fix bug where shiny.tag.list items threw an error; fixes #73

---
 R/withSpinner.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/withSpinner.R b/R/withSpinner.R
index b1aa54d..2c851bd 100644
--- a/R/withSpinner.R
+++ b/R/withSpinner.R
@@ -49,7 +49,7 @@ withSpinner <- function(
   hide.ui = TRUE
 ) {
   
-  if (!inherits(ui_element, "shiny.tag")) {
+  if (!inherits(ui_element, "shiny.tag") && !inherits(ui_element, "shiny.tag.list")) {
     stop("`ui_element` must be a Shiny tag", call. = FALSE)
   }
   if (!type %in% 0:8) {