Commit before trying to remove reified impulses

2025-10-15 14:19:38 +01:00
parent a0c4d62018
commit f9bcac915f
7 changed files with 147 additions and 452 deletions
@@ -89,6 +89,7 @@ drawCrInfo u = foldMap f . IM.elems $ w ^. cWorld . lWorld . creatures
                    , g show "cpVigilance" $ cr ^? crPerception . cpVigilance
                    , g show "crAction" $ cr ^? crActionPlan . apAction
                    , g show "crImpulse" $ cr ^? crActionPlan . apImpulse
+                    , g show "crName" $ cr ^? crName
                    ]
    setclip s u'' = fromMaybe u'' $ do
        guard (SDL.ButtonLeft `M.member` (u'' ^. uvWorld . input . mouseButtons))