Cleanup, stop drawing space characters

2023-05-19 18:24:53 +01:00
parent 448669cd83
commit 03b793802f
5 changed files with 9 additions and 14 deletions
@@ -15,7 +15,7 @@ import Picture.Base
 invSelectionItem :: Creature -> Int -> Item -> SelectionItem ()
 invSelectionItem cr i it =
    SelectionItem
-        { _siPictures = (pics & ix 0 %~ (++ anyequippos ++ anyhotkey))
+        { _siPictures = pics & ix 0 %~ (++ anyequippos ++ anyhotkey)
        , _siHeight = itSlotsTaken it
        , _siIsSelectable = True
        , _siColor = col