Expand the selected bar

2020-10-11 21:16:48 +02:00
parent 7afd262b1b
commit ea58465240
1 changed files with 1 additions and 0 deletions
--- a/app/ghcup/BrickMain.hs
+++ b/app/ghcup/BrickMain.hs
@@ -164,6 +164,7 @@ ui AppState { appData = AppData {..}, appSettings = as@(AppSettings {..}), ..}
                      then emptyWidget
                      else foldr1 (\x y -> x <+> str "," <+> y) $ notes
              )
+          <+> (vLimit 1 $ fill ' ')
          )

  printTag Recommended    = Just $ withAttr "recommended" $ str "recommended"