diff --git a/src/play_clj/g2d_physics.clj b/src/play_clj/g2d_physics.clj
index 2a6fe39..e191653 100644
--- a/src/play_clj/g2d_physics.clj
+++ b/src/play_clj/g2d_physics.clj
@@ -39,7 +39,7 @@
 
 ; bodies
 
-(defn body-type
+(defn ^:private body-type
   [k]
   (u/gdx-class :physics :box2d :BodyDef
                (str "BodyType/" (u/key->pascal k) "Body")))