Put robot name in JSON

Robot display was mistakenly put in robot name.
swarm-game · Jul 21, 2024 · 897b7fb · 897b7fb
1 parent 5c461eb
commit 897b7fb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/swarm-engine/Swarm/Game/Robot/Concrete.hs b/src/swarm-engine/Swarm/Game/Robot/Concrete.hs
@@ -141,7 +141,7 @@ instance Ae.ToJSON Robot where
     Ae.object $
       catMaybes
         [ "id" .== (r ^. robotID)
-        , "name" .== (r ^. robotEntity . entityDisplay)
+        , "name" .== (r ^. robotEntity . entityName)
         , "description" .=? (r ^. robotEntity . entityDescription) $ mempty
         , "loc" .== (r ^. robotLocation)
         , "dir" .=? (r ^. robotEntity . entityOrientation) $ zero