Join borders

dixonary · May 27, 2019 · ed48379 · ed48379
1 parent 02f0923
commit ed48379
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/UI.hs b/src/UI.hs
@@ -15,7 +15,7 @@ import Shared
 
 drawUI :: Game -> [Widget Name]
 drawUI Game{..} = return $
-    border $ leftWidget <+> vBorder <+> rightWidget 
+    joinBorders $ border $ leftWidget <+> vBorder <+> rightWidget 
     where
         main = vLimit 4 $ optionWidget _optionsList