From 70153de8c77ead4849e45fad0eaaacb7c6f5ac1f Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Thu, 1 Oct 2020 22:01:20 -0400
Subject: Drop extra cells if a row is longer than the header in a markdown
 table

---
 md.bqn | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/md.bqn b/md.bqn
index 45fdada0..de6d9203 100644
--- a/md.bqn
+++ b/md.bqn
@@ -259,7 +259,7 @@ Markdown ← {filename𝕊𝕩:
     rows ← (Trim¨ CutTableRow⊸⊔)¨ 𝕩
     incl ← ¬ rule ← (∧´∾∊"-:"˙)¨ rows
     align ← alignments ⊏˜ (+˜⊸+´0‿¯1⊏⊢)¨ ':' = ⊑ rule / rows
-    rows ↩ ProcInline¨¨⌾(incl⊸/) rows
+    rows ↩ (((≠align)⌊≠)⊸↑ ProcInline¨)¨⌾(incl⊸/) rows
     rows ↩ (⊏rows) (⊢ ∾ ⟨""⟩ /˜ 0⌈-○≠)¨ rows
     rowType ← incl / +` rule  # Head or body
     tags ← rowType ⊏ "th"‿"td"
-- 
cgit v1.2.3