                                         js/String.fromCharCode
                                         .toLowerCase))]
         (let [key-name (keyword (str human-name "?"))]
+          (when (and (= key-name :t?)
+                     (= direction :down)
+                     app-state)
+            (request-full-screen (get-in @app-state [:webgl :canvas :node])
+                                 (get-in @app-state [:hmds :hmd])))
           (cast! :key-state-changed [{:key-name-kw key-name
                                       :code        (.-which event)
                                       :depressed?  (= direction :down)}]))))))

                                                                                                                                   :draw-mode 4}
                                                                                                                                  tagged-primitive
                                                                                                                                  ;; Remove once we support materials
                                                                                                                                  ;;{:material  {:values {:diffuse [0.800000011920929 0.09411760419607162 0.16862799227237701 1]}, :name "material_1"}}
                                                                                                                                  )]}]}]
                                                                              (js/console.log "\tnew: " (clj->js new-primitive))
                                                                              new-primitive))

                    :tick-first-frame?    false
                    :manual-tick?         false
                    :collapse-all?        false
                    :capture-first-frame? false
                    :super-mesh?          false}
        initial    (reduce merge {} (map (partial uri-param parsed-uri) (clj->js ks)))
        ;; Use this if you need to do any fn-based changes, e.g. split on a uri param
        special {:skybox-name (when-let [skybox-name (second (uri-param parsed-uri "skybox-name" "sky1.png"))]
