diff --git a/R/htmlBoxManipulation.R b/R/htmlBoxManipulation.R
index 7df58b8..5583fc9 100644
--- a/R/htmlBoxManipulation.R
+++ b/R/htmlBoxManipulation.R
@@ -169,6 +169,9 @@ htmlRemoveBoxTitle <- function(box, removeHeader = FALSE) {
   if (removeHeader) {
     htmltools::tagQuery(box)$find(".box-header")$remove()$allTags()
   } else {
-    htmltools::tagQuery(box)$find(".box-title")$remove()$allTags()
+    htmltools::tagQuery(box)$
+      find(".box-title")$
+      replace(htmltools::tags$span(htmltools::HTML("&nbsp;")))$
+      allTags()
   }
 }