gnarly hack to make FPS work okay in full screen.

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

@@ -473,7 +473,7 @@ void main()
              :sigh-sound (sound "ego/sigh.ogg")
              :breakglass-sound (sound "ego/breakglass.ogg")
              :idea-sound (sound "ego/idea.ogg")
-             :blink (sound "blink.ogg")
+             :blink (sound "ego/blink2.ogg")
              :scale-x start-scale
              :scale-y start-scale
              :talk-color (color 0.6 1.0 1.0 1.0) 

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

@@ -207,6 +207,11 @@
                                                  (.width (.getDesktopDisplayMode Gdx/graphics))
                                                  (.height (.getDesktopDisplayMode Gdx/graphics))
                                                  true)
+                                
+                                (set! (.foregroundFPS (-> (class Gdx/graphics)
+                                    (.getDeclaredField (name "config"))
+                                    (doto (.setAccessible true))
+                                        (.get Gdx/graphics))) 60 )
                                 (label! (:fullscreen entities) set-text "Fullscreen")))
                        :else
                        nil))))
@@ -214,3 +219,5 @@
   :on-resize (fn [{:keys [viewport width height]} [entities]]
                (.update viewport width height)
                nil))
+
+