pausing and resuming.

2016-02-18 19:29:02 -08:00
parent a66d4af877
commit 21ba80aa7e
3 changed files with 9 additions and 1 deletions
--- a/desktop/src-common/advent/screens/title.clj
+++ b/desktop/src-common/advent/screens/title.clj
@@ -372,6 +372,10 @@
            ]
        (merge entities (:main-menu entities)))))

+  :on-pause (fn [_ _]
+              (utils/set-fullscreen! false)
+              nil)
+
  :on-render
  (fn [{:keys [^FitViewport viewport] :as screen} [entities]]
    (.apply viewport)