1 files changed, 2 insertions, 2 deletions
diff --git a/UI.hs b/UI.hs
index b3482aa..7de5f0e 100644
--- a/UI.hs
+++ b/UI.hs
@@ -58,9 +58,9 @@ drawUI st = [ui]
     ui = vBox [ hBorderWithLabel (str "[ Status ]")
               , vLimit 3 $ C.center $ status
               , hBorderWithLabel (str "[ Current settings ]")
-              , padAll 1 $ C.center $ settingsBox
+              , vLimit 8 $ C.center $ settingsBox
               , hBorderWithLabel (str "[ Presets ]")
-              , padAll 1 $ C.center $ presetsBox
+              , vLimit (2 + length presets) $ C.center $ presetsBox
               , hBorderWithLabel (str "[ Actions ]")
               , vLimit 6 $ C.center $ actionsBox
               ]