diff --git a/src/Dodge/Inventory/SelectionList.hs b/src/Dodge/Inventory/SelectionList.hs index 692625db0..5233e83e7 100644 --- a/src/Dodge/Inventory/SelectionList.hs +++ b/src/Dodge/Inventory/SelectionList.hs @@ -34,7 +34,7 @@ invSelectionItem w indent loc = SelItem { _siPictures = itemDisplay w cr ci , _siHeight = itInvHeight $ ci ^. _1 - , _siWidth = 15 + , _siWidth = maximum (15 : (length <$> itemDisplay w cr ci)) , _siIsSelectable = True , _siColor = itemInvColor ci , _siOffX = indent