From 646d8e0fa1620e0e9932209679d103cdd5e98699 Mon Sep 17 00:00:00 2001 From: oakes Date: Tue, 14 Jan 2014 01:56:25 -0500 Subject: [PATCH] Remove deprecated stuff --- src/play_clj/core.clj | 3 --- src/play_clj/core_deprecated.clj | 16 ---------------- 2 files changed, 19 deletions(-) delete mode 100644 src/play_clj/core_deprecated.clj diff --git a/src/play_clj/core.clj b/src/play_clj/core.clj index 0e2ee37..0ba98ac 100644 --- a/src/play_clj/core.clj +++ b/src/play_clj/core.clj @@ -21,7 +21,6 @@ [com.badlogic.gdx.scenes.scene2d Actor Stage])) (load "core_2d") -(load "core_deprecated") (load "core_global") (load "core_render") @@ -50,14 +49,12 @@ listeners [(input-processor options execute-fn!) (gesture-detector options execute-fn!)] ui-listeners (ui/create-listeners options execute-fn!) - create-renderer-fn! #(swap! screen assoc :renderer (renderer %)) update-fn! #(swap! screen merge %)] {:screen screen :entities entities :show (fn [] (swap! screen assoc :total-time 0 - :create-renderer-fn! create-renderer-fn! :update-fn! update-fn! :ui-listeners ui-listeners) (execute-fn! on-show)) diff --git a/src/play_clj/core_deprecated.clj b/src/play_clj/core_deprecated.clj deleted file mode 100644 index 18d4f23..0000000 --- a/src/play_clj/core_deprecated.clj +++ /dev/null @@ -1,16 +0,0 @@ -(in-ns 'play-clj.core) - -(defn create-renderer! - [{:keys [create-renderer-fn!]} & {:keys [] :as args}] - (:renderer (create-renderer-fn! args))) - -(defmulti renderer :type :default nil) - -(defmethod renderer nil [opts]) - -(defmethod renderer :stage [_] - (Stage.)) - -(defmacro label - [& args] - `(ui/label ~@args))