about summary refs log tree commit diff
path: root/users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs
diff options
context:
space:
mode:
Diffstat (limited to 'users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs')
-rw-r--r--users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs b/users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs
index 5d5e673c5b88..1f2d21665fdb 100644
--- a/users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs
+++ b/users/glittershark/xanthous/src/Xanthous/Game/Lenses.hs
@@ -111,7 +111,7 @@ characterVisibleEntities game =
 entitiesCollision
   :: ( Functor f
     , forall xx. MonoFoldable (f xx)
-    , forall xx. Element (f xx) ~ xx
+    , Element (f SomeEntity) ~ SomeEntity
     , Element (f (Maybe Collision)) ~ Maybe Collision
     , Show (f (Maybe Collision))
     , Show (f SomeEntity)