diff --git a/src/printbox-md/PrintBox_md.ml b/src/printbox-md/PrintBox_md.ml
index f33e4d9..e6ebe63 100644
--- a/src/printbox-md/PrintBox_md.ml
+++ b/src/printbox-md/PrintBox_md.ml
@@ -103,7 +103,8 @@ let pp c out b =
   (* We cannot use Format for indentation, because we need to insert ">" at the right places. *)
   let rec loop ~in_html ~prefix b =
     match B.view b with
-    | B.Empty -> ()
+    | B.Empty ->
+      if not in_html && c.Config.frames = `Stylized then fprintf out "@,%s" prefix
     | B.Text {l; style} ->
       let l = break_lines l in
       let multiline = List.length l > 1 in
diff --git a/test/test_md.expected b/test/test_md.expected
index 3d8ca01..e64059e 100644
--- a/test/test_md.expected
+++ b/test/test_md.expected
@@ -31,9 +31,11 @@ Test uniform unfolded:
   line 2<br>
   line 3
 - <span style="border:thin solid">
+  
   - <span style="border:thin solid">header 3</span>
     - <span style="border:thin solid">subchild 3</span></span>
 - 
+  
   - <span style="border:thin solid">header 4</span>
     - subchild 4
 - <span style="border:thin solid"><span style="font-family: monospace">header 5</span>
diff --git a/test/test_md.expected.md b/test/test_md.expected.md
index 3d8ca01..e64059e 100644
--- a/test/test_md.expected.md
+++ b/test/test_md.expected.md
@@ -31,9 +31,11 @@ Test uniform unfolded:
   line 2<br>
   line 3
 - <span style="border:thin solid">
+  
   - <span style="border:thin solid">header 3</span>
     - <span style="border:thin solid">subchild 3</span></span>
 - 
+  
   - <span style="border:thin solid">header 4</span>
     - subchild 4
 - <span style="border:thin solid"><span style="font-family: monospace">header 5</span>