From 2f20efa27eb6054c939081456bb7e7ff234867dd Mon Sep 17 00:00:00 2001
From: oakes <zsoakes@gmail.com>
Date: Fri, 10 Jan 2014 19:27:53 -0500
Subject: [PATCH] Rename keycode function

---
 src/play_clj/core_global.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/play_clj/core_global.clj b/src/play_clj/core_global.clj
index f3470e1..3e73d36 100644
--- a/src/play_clj/core_global.clj
+++ b/src/play_clj/core_global.clj
@@ -34,14 +34,14 @@
     :y (.getY ^Input (Gdx/input))
     nil))
 
-(defmacro get-keycode
+(defmacro keycode
   [key]
   `~(symbol
       (str utils/gdx-package ".Input$Keys/" (utils/key->static-field key))))
 
 (defmacro is-pressed?
   [key]
-  `(.isKeyPressed ^Input (Gdx/input) (get-keycode ~key)))
+  `(.isKeyPressed ^Input (Gdx/input) (keycode ~key)))
 
 (defn- input-processor
   [{:keys [on-key-down on-key-typed on-key-up on-mouse-moved