Fixes #39: more compact markdown output

Remove double empty lines after `</details>`.
c-cube · Feb 17, 2024 · 51d2fc5 · 51d2fc5
1 parent e3aedef
commit 51d2fc5
Show file tree

Hide file tree

Showing 4 changed files with 3 additions and 33 deletions.
diff --git a/src/printbox-md/PrintBox_md.ml b/src/printbox-md/PrintBox_md.ml
@@ -494,8 +494,10 @@ let pp c out b =
         (fun _out sub -> loop ~no_block ~no_md ~prefix:subprefix sub)
         out
       @@ Array.to_list body;
+      (* Note: vlist and tree element separators move to a new line.
+         A non-html hlist or table as a parent would not produce correct results. *)
       if c.Config.foldable_trees then
-        fprintf out "@,%s</details>@,%s@,%s" prefix prefix prefix
+        fprintf out "@,%s</details>@,%s" prefix prefix
     | B.Link { uri; inner } ->
       pp_print_string out "[";
       loop ~no_block:true ~no_md ~prefix:(prefix ^ " ") inner;

diff --git a/src/printbox-md/README.md b/src/printbox-md/README.md
@@ -121,11 +121,9 @@ Trees are rendered as:
   - **are the details.**
   </details>
 
-
 </details>
 
 
-
 ### Tables
 
 There is a special case carved out for Markdown syntax tables.

diff --git a/test/test_md.expected b/test/test_md.expected
@@ -191,10 +191,8 @@ Test foldable:
   >   - > subchild 3
   >   </details>
   >   
-  >   
   > </details>
   > 
-  > 
 - <details><summary></summary>
 
   - <details><summary>[header 4]</summary>
@@ -204,14 +202,11 @@ Test foldable:
       - `<nothing>`
       </details>
 
-
     - & \*\*subchild\*\* 4
     </details>
 
-
   </details>
 
-
 - > <details><summary><code>header 5</code></summary>
   > 
   > - 
@@ -225,7 +220,6 @@ Test foldable:
   >   
   > </details>
   > 
-  > 
 - > > 
   > > ```
   > > a    │looooooooooooooooooooooooo
@@ -257,7 +251,6 @@ Test foldable:
 </details>
 
 
-
 Test uniform tab=2, text tables:
 <details><summary><code>┌────┐<br>
 │root│<br>
@@ -345,14 +338,11 @@ Test uniform tab=2, text tables:
       - `<nothing>`
       </details>
 
-
     - & \*\*subchild\*\* 4
     </details>
 
-
   </details>
 
-
 - 
   ```
   ┌───────────────────────┐
@@ -424,7 +414,6 @@ Test uniform tab=2, text tables:
 </details>
 
 
-
 Test single quote tab=2, text tables:
 <details><summary><code>┌────┐<br>
 │root│<br>
@@ -488,14 +477,11 @@ Test single quote tab=2, text tables:
       - `<nothing>`
       </details>
 
-
     - & \*\*subchild\*\* 4
     </details>
 
-
   </details>
 
-
 - `┌───────────────────────┐`  
   `│header 5 · · · · · · · │`  
   `│└─subchild 5 · · · · · │`  
@@ -551,5 +537,4 @@ Test single quote tab=2, text tables:
 </details>
 
 
-
 The end.
diff --git a/test/test_md.expected.md b/test/test_md.expected.md
@@ -191,10 +191,8 @@ Test foldable:
   >   - > subchild 3
   >   </details>
   >   
-  >   
   > </details>
   > 
-  > 
 - <details><summary></summary>
   
   - <details><summary>[header 4]</summary>
@@ -204,14 +202,11 @@ Test foldable:
       - `<nothing>`
       </details>
       
-      
     - & \*\*subchild\*\* 4
     </details>
     
-    
   </details>
   
-  
 - > <details><summary><code>header 5</code></summary>
   > 
   > - 
@@ -225,7 +220,6 @@ Test foldable:
   >   
   > </details>
   > 
-  > 
 - > > 
   > > ```
   > > a    │looooooooooooooooooooooooo
@@ -257,7 +251,6 @@ Test foldable:
 </details>
 
 
-
 Test uniform tab=2, text tables:
 <details><summary><code>┌────┐<br>
 │root│<br>
@@ -345,14 +338,11 @@ Test uniform tab=2, text tables:
       - `<nothing>`
       </details>
       
-      
     - & \*\*subchild\*\* 4
     </details>
     
-    
   </details>
   
-  
 - 
   ```
   ┌───────────────────────┐
@@ -424,7 +414,6 @@ Test uniform tab=2, text tables:
 </details>
 
 
-
 Test single quote tab=2, text tables:
 <details><summary><code>┌────┐<br>
 │root│<br>
@@ -488,14 +477,11 @@ Test single quote tab=2, text tables:
       - `<nothing>`
       </details>
       
-      
     - & \*\*subchild\*\* 4
     </details>
     
-    
   </details>
   
-  
 - `┌───────────────────────┐`  
   `│header 5 · · · · · · · │`  
   `│└─subchild 5 · · · · · │`  
@@ -551,5 +537,4 @@ Test single quote tab=2, text tables:
 </details>
 
 
-
 The end.