Add methods and clean up

2014-01-06 00:27:57 -05:00
parent 8e0fdc8ed4
commit a848ebac32
3 changed files with 12 additions and 14 deletions
--- a/src/play_clj/utils.clj
+++ b/src/play_clj/utils.clj
@@ -2,7 +2,7 @@
  (:require [clojure.string :as s])
  (:import [com.badlogic.gdx.utils Array]))

-(defn- split-keys
+(defn- split-key
  [key]
  (-> key name (s/split #"-")))

@@ -13,7 +13,7 @@
 (defn gdx-static-field*
  [args]
  (->> (last args)
-       split-keys
+       split-key
       (map s/upper-case)
       (s/join "_")
       (str (join-keys (butlast args)) "/")