diff --git a/R/HTMLBlock.R b/R/HTMLBlock.R
index 648fa520..53438e89 100644
--- a/R/HTMLBlock.R
+++ b/R/HTMLBlock.R
@@ -18,6 +18,7 @@ HTMLBlock <- R6::R6Class( # nolint: object_name_linter.
#' @return Object of class `HTMLBlock`, invisibly.
initialize = function(content) {
if (!missing(content)) {
+ checkmate::assert_multi_class(content, c("shiny.tag", "shiny.tag.list", "htmlwidget"))
self$set_content(content)
}
invisible(self)