Move background item effects out of records

2025-06-05 22:08:39 +01:00
parent 10ca82c4d5
commit 9a699e70ed
11 changed files with 272 additions and 143 deletions
@@ -65,7 +65,7 @@ itemScan =
    defaultHeldItem
        & itType .~ ITEMSCAN
        & itUse .~ UseNothing
-        & itEffect . ieOnDrop .~ ItemCancelExamineInventory
+--        & itEffect . ieOnDrop .~ ItemCancelExamineInventory

 mapper :: Item
 mapper =
@@ -91,7 +91,7 @@ copier x =
        & itType .~ COPIER x
        & itUse .~ UseValue (Left 0)
        & itScroll .~ ItemScrollInt 0
-        & itEffect . ieInv .~ ItemCopierUpdate
+        -- & itEffect . ieInv .~ ItemCopierUpdate

 nulgate :: Item
 nulgate =