Allow pausable reloads with discrete progess steps

2022-06-22 14:20:20 +01:00
parent 029b6daf8e
commit ac0948cb64
6 changed files with 60 additions and 76 deletions
@@ -87,7 +87,7 @@ handlePressedKeyInGame scode w = case scode of
    ScancodeP       -> pauseGame $ escapeMap w
    ScancodeF       -> youDropItem w
    ScancodeM       -> toggleMap w
-    ScancodeR       -> crStartReloading (you w) w
+    ScancodeR       -> crToggleReloading (you w) w
    ScancodeT       -> testEvent w
    ScancodeX       -> w & hud . hudElement %~ toggleTweakInv
    ScancodeC       -> toggleCombineInv w