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
@@ -654,7 +654,7 @@ repeatOnFrames is hm f it cr w =
 --        return $ f it cr' w'

 duplicateLoaded :: ChainEffect
-duplicateLoaded eff it cr w = foldr f w (take numbul [1 .. ])
+duplicateLoaded eff it cr w = foldr f w (take numbul [1::Int .. ])
  where
    f _ = eff it cr
    numbul = fromMaybe 0 $ do