final fix

This commit is contained in:
Bryce Covert
2022-10-25 09:19:53 -07:00
parent 20e3e1f73a
commit a809c84019
2 changed files with 7 additions and 7 deletions

View File

@@ -127,7 +127,7 @@
(fn [[so-far a] next]
(let [new-a (+ a (or (:colspan next)
1))]
(if (<= new-a n)
(if (> new-a n)
[(conj so-far next) new-a]
[so-far new-a])))