From 66bcc3aef72eb5881299d07888d72c53aadad900 Mon Sep 17 00:00:00 2001
From: Craig Williams <craig@avsdev.uk>
Date: Mon, 26 Jan 2026 14:02:20 +0000
Subject: [PATCH] Fixed shrunk box header once title is removed

---
 R/htmlBoxManipulation.R | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

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()
   }
 }