Move item inv size and item dimensions from records to external function

src/Dodge/Combine.hs

@@ -3,6 +3,7 @@ module Dodge.Combine (
     combineList,
 ) where
 
+import Dodge.Item.InvSize
 import Dodge.Item.Grammar
 import Data.Bifunctor
 import Data.Foldable
@@ -23,7 +24,7 @@ combineList = map f . combineItemListYouX
     f (is, itm) =
         SelectionItem
             { _siPictures = basicItemDisplay itm
-            , _siHeight = _itInvSize itm
+            , _siHeight = itInvHeight itm
             , _siWidth = 15
             , _siIsSelectable = True
             , _siColor = itemInvColor . pciToCI $ basePCI itm