1 files changed, 9 insertions, 17 deletions
diff --git a/Game/Code/Classes/UCore.pas b/Game/Code/Classes/UCore.pas
index ac29e727..c19147ea 100644
--- a/Game/Code/Classes/UCore.pas
+++ b/Game/Code/Classes/UCore.pas
@@ -329,28 +329,20 @@ end;
 //-------------
 //DeInits Core and all Modules
 //-------------
-Function TCore.DeInit: Boolean;
+Function TCore.DeInit: boolean;
+
 var
-  I: Integer;
-label Continue;
-begin
-  I := High(CORE_MODULES_TO_LOAD);
+  i: integer;
 
-  Continue:
-  Try
-    While (I >= 0) do
-    begin
-      If (Modules[I].NeedsDeInit) then
-        Modules[I].Module.DeInit;
+begin
 
-      Dec(I);
+  for i :=  High(CORE_MODULES_TO_LOAD) downto 0 do
+    try
+      if (Modules[i].NeedsDeInit) then
+        Modules[i].Module.DeInit;
+    except
     end;
-  Except
-
-
   end;
-  If (I >= 0) then
-    GoTo Continue;
 
   DeInitCore;