Fix burst rifle rate delay bug, various cleanups
This commit is contained in:
@@ -29,7 +29,7 @@ import NewInt
|
||||
import Padding
|
||||
import Picture.Base
|
||||
|
||||
invSelectionItem :: World -> Int -> LocationLDT ItemLink ComposedItem -> SelectionItem ()
|
||||
invSelectionItem :: World -> Int -> LocationLDT ItemLink CItem -> SelectionItem ()
|
||||
invSelectionItem w indent loc =
|
||||
SelectionItem
|
||||
{ _siPictures = itemDisplay w cr ci
|
||||
@@ -46,7 +46,7 @@ invSelectionItem w indent loc =
|
||||
|
||||
-- note the convoluted display of the hotkey/equipment, this was done to avoid a
|
||||
-- space leak
|
||||
itemDisplay :: World -> Creature -> ComposedItem -> [String]
|
||||
itemDisplay :: World -> Creature -> CItem -> [String]
|
||||
itemDisplay w cr ci = -- f
|
||||
basicItemDisplay itm
|
||||
-- (itemNumberDisplay w cr ci)
|
||||
@@ -152,7 +152,7 @@ itemScrollValue itm = Left <$> itm ^? itScroll . failing itsInt itsRangeInt
|
||||
-- | rs == "" = ls
|
||||
-- | otherwise = midPadL 15 ' ' ls (' ' : rs)
|
||||
|
||||
--itemNumberDisplay :: World -> Creature -> ComposedItem -> [String]
|
||||
--itemNumberDisplay :: World -> Creature -> CItem -> [String]
|
||||
--itemNumberDisplay w cr ci
|
||||
-- | Just x <- ci ^? _1 . itUse . uInt = [show x]
|
||||
-- | Just x <- ci ^? _1 . itUse . useToggle = [show x]
|
||||
|
||||
Reference in New Issue
Block a user