Fix reprogram requiring wrong inventory

Fixes the mistake introduces in #373.
swarm-game · Jun 22, 2022 · 1af512f · 1af512f
1 parent bbcdfbc
commit 1af512f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Swarm/Game/Step.hs b/src/Swarm/Game/Step.hs
@@ -1199,7 +1199,7 @@ execConst c vs s k = do
         (creative || (childRobot ^. robotLocation) `manhattan` loc <= 1)
           `holdsOrFail` ["You can only reprogram an adjacent robot."]
 
-        _ <- checkRequiredDevices (childRobot ^. robotInventory) cmd "The target robot" FixByInstall
+        _ <- checkRequiredDevices (childRobot ^. installedDevices) cmd "The target robot" FixByInstall
 
         -- update other robot's CESK machine, environment and context
         -- the childRobot inherits the parent robot's environment