logging

desktop/src-common/advent/utils.clj

@@ -8,6 +8,7 @@
             [play-clj.entities :refer [->TextureEntity]]
             [clojure.java.io :as io]
             [clojure.edn :as edn]
+            [clojure.tools.logging :as log]
             [clojure.string :as str]
             [advent.saves :as saves]
             [advent.steam :as steam])
@@ -24,7 +25,7 @@
 
 (defn log-coords [screen entities]
   (let [{:keys [x y]} (input->screen screen {:x (:input-x screen) :y (:input-y screen)})]
-    (println (:input-x screen) (:input-y screen) "->" x y)))
+    (log/info (:input-x screen) (:input-y screen) "->" x y)))
 
 (def +all-cursors+ [:main :wool :mushrooms :carrot :right :down :left :up :flask :flask-with-contents :trophy :ladder :stick :cat-toy :balloon :frog-legs :teddy :portrait :recipe :glass-eye :motivational-tapes :used-earplugs :grass :slobber :flask-with-strength :medal :kiss :sword :hourglass :mandrake :ball-n-chain :key :rope :crowbar :note-1 :ash :sack-lunch :flies :spear :monocle :feather :spell-component :money :charcoal :broken-clock :slingshot :camera :walkie-talkies :alarm-clock :walkie-talkie :flask-water :flask-water-stuff :flask-water-stuff-2 :note-2 :magic-slingshot :active-main :shovel :broom])
 
@@ -294,7 +295,7 @@
   (try 
     (sound f)
     (catch Exception e
-      (println e)
+      (log/info e)
       (sound (str f ".mp3")))))
 
 
@@ -430,8 +431,8 @@
   (try
     (if val
       (on-gl (.setDisplayMode Gdx/graphics
-                              (doto (.width (.getDesktopDisplayMode Gdx/graphics)) println)
-                              (doto (.height (.getDesktopDisplayMode Gdx/graphics)) println)
+                              (doto (.width (.getDesktopDisplayMode Gdx/graphics)) log/info)
+                              (doto (.height (.getDesktopDisplayMode Gdx/graphics)) log/info)
                               true)
              (set! (.foregroundFPS (-> (class Gdx/graphics)
                                        (.getDeclaredField (name "config"))
@@ -443,7 +444,7 @@
      (save-settings!))
     nil
     (catch Exception e
-      (println e))))
+      (log/error e))))
 
 (defn toggle-fullscreen! []
   (if (.isFullscreen Gdx/graphics)