fix column positioning in SimpleWindow

This commit is contained in:
2022-09-11 00:08:40 +00:00
parent 2eb84d0bf4
commit 57e2e81708

View File

@@ -69,7 +69,7 @@
// TODO controls that aren't the same height as text will be able to vertically overflow
(let [columnControls (controls.members.slice (if title 1 0))]
(when (and columnControls (= 0 (% columnControls.length controlsPerColumn)))
(set nextControlY y)
(set nextControlY 0)
(when title (+= nextControlY control.height))
(+= nextControlX (apply max
(for control (last (groups columnControls controlsPerColumn))