fix(single): Flatten identation of list items

2 files changed, 4 insertions, 2 deletions

diff --git a/demo/src/index.md b/demo/src/index.md
index 7657d3d..523a9c3 100644
--- a/demo/src/index.md
+++ b/demo/src/index.md
@@ -84,7 +84,7 @@ un*frigging*believable
   3. c
 
 * o
-  *Hello*
+   *Hello*
 
   **World**
 
diff --git a/single.awk b/single.awk
index 2ac29cf..00f9e2e 100644
--- a/single.awk
+++ b/single.awk
@@ -244,7 +244,9 @@ function abs(x) { return ((x < 0) ? -x : x) }
 	else {
 		println("</li><li>")
 	}
-	$0 = substr($0, RSTART + RLENGTH)
+}
+!blankline && lengthStack("list-level") > 0 {
+	$0 = substr($0, abs(topStack("list-level")) + 1)
 }
 
 # Paragraphs