1.1 --- a/org/world.org	Wed Dec 07 10:29:35 2011 -0600
     1.2 +++ b/org/world.org	Wed Dec 07 12:16:48 2011 -0600
     1.3 @@ -46,14 +46,14 @@
     1.4     =SimpleApplication= classes.
     1.5  
     1.6  ** Header
     1.7 -#+srcname: header
     1.8 +#+name: header
     1.9  #+begin_src clojure :results silent    
    1.10  (ns cortex.world
    1.11    "World Creation, abstracion over jme3's input system, and REPL
    1.12    driven exception handling"
    1.13    {:author "Robert McIntyre"}
    1.14    
    1.15 -  (:use (clojure.contrib (def :only (defvar))))
    1.16 +  (:use (clojure.contrib (def :only (defvar defn-memo))))
    1.17    (:use [clojure.contrib [str-utils :only [re-gsub]]])
    1.18  
    1.19    (:import com.aurellem.capture.IsoTimer)
    1.20 @@ -71,11 +71,13 @@
    1.21    (:import com.jme3.app.SimpleApplication)
    1.22    (:import com.jme3.input.controls.ActionListener)
    1.23    (:import com.jme3.renderer.queue.RenderQueue$ShadowMode)
    1.24 -  (:import org.lwjgl.input.Mouse))
    1.25 +  (:import org.lwjgl.input.Mouse)
    1.26 +  (:import com.aurellem.capture.AurellemSystemDelegate))
    1.27 +
    1.28  #+end_src    
    1.29      
    1.30  ** General Settings
    1.31 -#+srcname: settings    
    1.32 +#+name: settings    
    1.33  #+begin_src clojure 
    1.34  (in-ns 'cortex.world)
    1.35  
    1.36 @@ -105,7 +107,7 @@
    1.37  Instance.
    1.38  
    1.39  ** Exception Protection
    1.40 -#+srcname: exceptions
    1.41 +#+name: exceptions
    1.42  #+begin_src clojure
    1.43  (in-ns 'cortex.world)
    1.44  
    1.45 @@ -138,7 +140,7 @@
    1.46  restarting the JVM.
    1.47  
    1.48  ** Input
    1.49 -#+srcname: input
    1.50 +#+name: input
    1.51  #+begin_src clojure
    1.52  (in-ns 'cortex.world)
    1.53  
    1.54 @@ -192,6 +194,9 @@
    1.55  
    1.56  #+end_src
    1.57  
    1.58 +#+results: input
    1.59 +: #'cortex.world/initialize-inputs
    1.60 +
    1.61  These functions are for controlling the world through the keyboard and
    1.62  mouse.
    1.63  
    1.64 @@ -226,7 +231,7 @@
    1.65  :  ["key-at" #<KeyTrigger com.jme3.input.controls.KeyTrigger@4c3e2e5f>])
    1.66  
    1.67  ** World Creation
    1.68 -#+srcname: world
    1.69 +#+name: world
    1.70  #+begin_src clojure :results silent
    1.71  (in-ns 'cortex.world)
    1.72  
    1.73 @@ -326,6 +331,7 @@
    1.74        (.setShowSettings false)
    1.75        ;; continue running simulation even if the window has lost
    1.76        ;; focus.
    1.77 +      (JmeSystem/setSystemDelegate (AurellemSystemDelegate.))
    1.78        (.setPauseOnLostFocus false)
    1.79        (.setSettings *app-settings*))))
    1.80  #+end_src