Fix Codex run

Author: graham-trott

resources/ecs/about.ecs

@@ -53,10 +53,13 @@ Start:
     attach CodexButton to `about-codex`
     on click CodexButton
     begin
-    alert `Codex`
-	    require js `dist/plugins/codemirror.js`
-    	rest get Codex from `/resources/ecs/codex.ecs`
-    	send `hide` to parent
-    	run Codex
+        if Codex is not running
+        begin
+    	    require js `dist/plugins/codemirror.js`
+        	rest get Codex from `/resources/ecs/codex.ecs`
+        	send `hide` to parent
+        	run Codex
+        end
+        send `start` to Codex
     end
     stop

resources/ecs/codex.ecs

@@ -332,16 +332,21 @@ L2:
     	remove element Body
         send `restore` to parent
         history set url `.`
-        exit
+!        exit
+        set style `display` of Body to `none`
     end
 
     on message
     begin
     	put the message into Message
+    	if Message is `start`
+        begin
+            set style `display` of Body to `block`
+        end
     	if Message is `next` go to StepForward
         if Message is `tutorial`
         begin
-		    	set style `display` of ReferencePanel to `none`
+		    set style `display` of ReferencePanel to `none`
 	        set style `display` of HelpPanel to `block`
 	        set style `display` of HelpButtons to `block`
 	        put empty into storage as `.ref`