diff --git a/src/Mtlstats/Prompt.hs b/src/Mtlstats/Prompt.hs
index 3ff8105..ce14916 100644
--- a/src/Mtlstats/Prompt.hs
+++ b/src/Mtlstats/Prompt.hs
@@ -49,7 +49,7 @@ module Mtlstats.Prompt (
 ) where
 
 import Brick.Types (BrickEvent (VtyEvent), Location (Location), Widget)
-import Brick.Widgets.Core (hBox, showCursor, str)
+import Brick.Widgets.Core (showCursor, str, vBox)
 import Control.Monad (when)
 import Control.Monad.Extra (whenJust)
 import Control.Monad.State.Class (gets, modify)
@@ -218,9 +218,9 @@ selectPrompt params = Prompt
         desc = spElemDesc params x
         in str $ "F" ++ show n ++ ") " ++ desc)
       results
-    in hBox $
-      [ showCursor () (Location (0, pWidth)) $ str pStr
-      , str ""
+    in vBox $
+      [ showCursor () (Location (pWidth, 0)) $ str pStr
+      , str " "
       , str $ spSearchHeader params
       ] ++ fmtRes
   , promptProcessChar = spProcessChar params