From ff0f1c4c24c6a1888f2a40d0ccbbd57ba6643973 Mon Sep 17 00:00:00 2001
From: Applevangelist <post@tniedermeier.com>
Date: Tue, 18 Oct 2022 17:23:01 +0200
Subject: [PATCH] #CTLD * added a check for zones; not added when zone does not
 exist

---
 Moose Development/Moose/Ops/CTLD.lua | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/Moose Development/Moose/Ops/CTLD.lua b/Moose Development/Moose/Ops/CTLD.lua
index 7b5dd5929..6dea1271c 100644
--- a/Moose Development/Moose/Ops/CTLD.lua	
+++ b/Moose Development/Moose/Ops/CTLD.lua	
@@ -1074,7 +1074,7 @@ CTLD.UnitTypes = {
 
 --- CTLD class version.
 -- @field #string version
-CTLD.version="1.0.15"
+CTLD.version="1.0.16"
 
 --- Instantiate a new CTLD.
 -- @param #CTLD self
@@ -3405,7 +3405,13 @@ end
 -- @return #CTLD self
 function CTLD:AddCTLDZone(Name, Type, Color, Active, HasBeacon, Shiplength, Shipwidth)
   self:T(self.lid .. " AddCTLDZone")
-
+  
+  local zone = ZONE:FindByName(Name)
+  if not zone then
+    self:E(self.lid.."**** Zone does not exist: "..Name)
+    return self
+  end
+  
   local ctldzone = {} -- #CTLD.CargoZone
   ctldzone.active = Active or false
   ctldzone.color = Color or SMOKECOLOR.Red