Stop a module

Author: easycoder

js/easycoder/Core.js

@@ -1856,6 +1856,7 @@ const EasyCoder_Core = {
 			if (command.name) {
 				const symbolRecord = program.getSymbolRecord(command.name);
 				EasyCoder.scripts[symbolRecord.program].exit();
+				symbolRecord.program = null;
 			} else {
 				return 0;
 			}

resources/ecs/codex.ecs

@@ -41,6 +41,7 @@
     a Link
     a Index
     module TestModule
+		module DocManModule
   	callback DecoratorCallback
     variable Password
     variable PasswordRequested
@@ -270,44 +271,45 @@
     create HelpInner in HelpOuter
     set the style of HelpInner to `width:100%;line-height:1.5em`
 
-	create HelpPanel in HelpInner
-    set the style of HelpPanel to `display:none;width:100%;height:100%`
-	create ReferencePanel in HelpInner
-    set the style of ReferencePanel to `display:none;width:100%;height:100%`
+		create HelpPanel in HelpInner
+		set the style of HelpPanel to `display:none;width:100%;height:100%`
+		create ReferencePanel in HelpInner
+		set the style of ReferencePanel to `display:none;width:100%;height:100%`
 
-	gosub to ShowHelpPage
-	rest get Script from `/resources/ecs/docman.ecs`
-    run Script with ReferencePanel
-	put empty into storage as `.ref`
+		gosub to ShowHelpPage
+		rest get Script from `/resources/ecs/docman.ecs`
+		run Script with ReferencePanel as DocManModule
+		put empty into storage as `.ref`
 
-	get Item from storage as `.ref`
+		get Item from storage as `.ref`
     if Item
     begin
 	    set style `display` of ReferencePanel to `block`
         set style `display` of HelpButtons to `none`
     end
     else set style `display` of HelpPanel to `block`
 
-	on click Back go to StepBack
-	on click Forward go to StepForward
+		on click Back go to StepBack
+		on click Forward go to StepForward
     on click Contents go to ShowContents
-	on click Reference
+		on click Reference
     begin
 	    set style `display` of ReferencePanel to `block`
         set style `display` of HelpPanel to `none`
         set style `display` of HelpButtons to `none`
         put `y` into storage as `.ref`
     end
-	on click Tools
+		on click Tools
     begin
     	put `tools` into Step
 		gosub to ShowHelpPage
     end
-	on click Exit
+		on click Exit
     begin
+			stop DocManModule
     	remove element Body
-        send `restore` to parent
-        exit
+      send `restore` to parent
+      exit
     end
 
     on message