Implement reloading of single external magazines

2024-06-21 14:50:08 +01:00
parent 872e60438e
commit ecefba21d6
19 changed files with 157 additions and 340 deletions
@@ -42,7 +42,7 @@ attachmentTree cr = fromMaybe mempty $ do
    return $ upDownAttachments cr i i mempty

 upDownAttachments :: Creature -> Int -> Int -> M.Map AttachType Int -> M.Map AttachType Int
-upDownAttachments cr i j s = s
+upDownAttachments _ _ _ s = s

 --yourInvSel :: World -> Int
 --yourInvSel = crSel . you