From 3c7f6e421147fe8ae90776b90daa399ac2daaa08 Mon Sep 17 00:00:00 2001 From: oakes Date: Sat, 18 Jan 2014 00:40:08 -0500 Subject: [PATCH] Remove redundancy --- src/play_clj/g2d_physics.clj | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/src/play_clj/g2d_physics.clj b/src/play_clj/g2d_physics.clj index d873594..8d292c3 100644 --- a/src/play_clj/g2d_physics.clj +++ b/src/play_clj/g2d_physics.clj @@ -74,18 +74,15 @@ (defn body-x! [entity x] - (body-transform! entity x (body-y entity) (body-angle entity)) - entity) + (body-transform! entity x (body-y entity) (body-angle entity))) (defn body-y! [entity y] - (body-transform! entity (body-x entity) y (body-angle entity)) - entity) + (body-transform! entity (body-x entity) y (body-angle entity))) (defn body-angle! [entity angle] - (body-transform! entity (body-x entity) (body-y entity) angle) - entity) + (body-transform! entity (body-x entity) (body-y entity) angle)) ; fixtures