From 0663ba45c77b3222fda3074857dc3bf5ece7faec Mon Sep 17 00:00:00 2001 From: Marc Sunet Date: Wed, 8 Aug 2012 13:15:15 +0200 Subject: fixed whitespace --- Spear/Physics/World.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Spear/Physics/World.hs b/Spear/Physics/World.hs index 4ad0191..e0996e6 100644 --- a/Spear/Physics/World.hs +++ b/Spear/Physics/World.hs @@ -131,7 +131,7 @@ setForces fs (ObjectID i) world = world { bodies = bodies' } bs <- thaw $ bodies world obj <- readArray bs i writeArray bs i $ fmap (\obj -> obj { forces = fs }) obj - return bs + return bs -- | Set the world's gravity. -- cgit v1.2.3