@@ -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])))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user