removing cruft.

desktop/asset-work/pack.json

@@ -6,8 +6,8 @@
     edgePadding: true,
     duplicatePadding: false,
     rotation: false,
-    minWidth: 16,
-    minHeight: 16,
+    minWidth: 1024,
+    minHeight: 1024,
     maxWidth: 1024,
     maxHeight: 1024,
     square: false,

desktop/src-common/advent/core.clj

@@ -8,7 +8,6 @@
             [advent.screens.title :as title]
             [advent.screens.credits :as credits]
             [advent.screens.inventory :as inventory]
-            [advent.screens.test :as test]
             [advent.screens.safe :as safe]
             [clojure.pprint]
             [advent.pathfind])

desktop/src-common/advent/screens/test.clj

@@ -1,49 +0,0 @@
-(ns advent.screens.test
-  (:require [play-clj.core :refer :all]
-            [play-clj.math :refer :all]
-            [play-clj.ui :refer :all]
-            [play-clj.utils :refer :all]
-            [play-clj.g2d :refer :all]
-            [advent.utils :as utils]
-            [advent.tween :as tween]
-            [advent.screens.scene :as scene]
-            [advent.screens.dialogue :as dialogue]
-            [advent.screens.title :as title]
-            [advent.screens.inventory :as inventory]
-            [advent.screens.safe :as safe]
-            [advent.screens.fade :as fade]
-            )
-  (:import [com.badlogic.gdx.graphics Pixmap Pixmap$Filter Texture Texture$TextureFilter]
-           [com.badlogic.gdx.graphics.g2d TextureRegion]
-           [com.badlogic.gdx.utils.viewport FitViewport]
-           [com.badlogic.gdx.scenes.scene2d.ui Slider$SliderStyle]
-           [com.badlogic.gdx.scenes.scene2d.utils Align]
-           [com.badlogic.gdx Application Audio Files Game Gdx Graphics Input
-            InputMultiplexer InputProcessor Net Preferences Screen]))
-
-
-
-
-
-
-(defscreen test-screen
-  :on-show
-  (fn [screen entities]
-    
-    (utils/setup-viewport screen 320 240)
-    
-    {:overlay  (assoc (utils/get-texture "testscreen/test.png" ) :x 0 :y 0 :origin-x 0 :origin-y 0)
-     :subject  (assoc (utils/get-texture "testscreen/subject.png" ) :x 160 :y 120 :origin-x 7 :origin-y 7 :scale-x 5 :scale-y 5 )})
-
-  :on-render
-  (fn [screen [entities]]
-
-    (clear!)
-    (render! screen [(:overlay entities) (:subject entities)])
-    entities)
-
-  :show-screen (fn [entities]
-                 entities)
-  :on-resize (fn [{:keys [viewport width height]} [entities]]
-               (.update viewport width height)
-               nil))