easily swappable fullscreen.

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

@@ -953,6 +953,12 @@ void main()
   :on-resume (fn [screen [entities]]
                (doseq [[k [start time fn]] (get-in entities [:room :timers])]
                  (add-timer! screen k start time)))
+
+  :on-key-up
+  (fn [screen entities]
+    (when (= (key-code :escape) (:key screen))
+      (utils/toggle-fullscreen!))
+    nil)
   
   :on-render
   (fn [{:keys [camera ^FitViewport viewport] :as screen} [entities]]