diff --git a/src/new-debugger/src/Debugger/UI.hs b/src/new-debugger/src/Debugger/UI.hs
index 59e02b62..ffa9d64b 100644
--- a/src/new-debugger/src/Debugger/UI.hs
+++ b/src/new-debugger/src/Debugger/UI.hs
@@ -28,11 +28,10 @@ drawUI as = [ui]
              [ borderWithLabel (str "State") $ renderReactorState as
              , vLimitPercent 33 $ borderWithLabel (str "Events") $ renderEvents as
              ]
-           , borderWithLabel (str "Sequence Diagram") $ renderSeqDia as
-           ]
-         , vLimit 7 $ hBox
-           [ borderWithLabel (str "Input") $ renderMessage as
-           , borderWithLabel (str "Output") $ renderSentMessage as
+           , vBox
+             [ borderWithLabel (str "Input") $ renderMessage as
+             , borderWithLabel (str "Output") $ renderSentMessage as
+             ]
            ]
          , vLimit 7 $ borderWithLabel (str "Logs") $ renderLogs as
          ]