From ef9ddefc04a862ba7b8b5cfda9eedc0484626512 Mon Sep 17 00:00:00 2001
From: adv <adv@opencascade.com>
Date: Tue, 5 Nov 2013 07:09:14 +0000
Subject: [PATCH] Adding reference Region/Zone corrected.

---
 src/HYDROData/HYDROData_CalculationCase.cxx | 5 ++++-
 src/HYDROData/HYDROData_Region.cxx          | 5 ++++-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/HYDROData/HYDROData_CalculationCase.cxx b/src/HYDROData/HYDROData_CalculationCase.cxx
index af132d34..6c5339e2 100644
--- a/src/HYDROData/HYDROData_CalculationCase.cxx
+++ b/src/HYDROData/HYDROData_CalculationCase.cxx
@@ -198,8 +198,11 @@ bool HYDROData_CalculationCase::AddRegion( const Handle(HYDROData_Region)& theRe
 
     theRegion->SetLabel( aNewRegion->Label() );
   }
+  else
+  {
+    AddReferenceObject( theRegion, DataTag_Region );
+  }
 
-  AddReferenceObject( theRegion, DataTag_Region );
   return true;
 }
 
diff --git a/src/HYDROData/HYDROData_Region.cxx b/src/HYDROData/HYDROData_Region.cxx
index 40d193b5..45f96d92 100644
--- a/src/HYDROData/HYDROData_Region.cxx
+++ b/src/HYDROData/HYDROData_Region.cxx
@@ -73,8 +73,11 @@ bool HYDROData_Region::AddZone( const Handle(HYDROData_Zone)& theZone )
 
     theZone->SetLabel( aNewZone->Label() );
   }
+  else
+  {
+    AddReferenceObject( theZone, DataTag_Zone );
+  }
 
-  AddReferenceObject( theZone, DataTag_Zone );
   return true;
 }
 
-- 
2.39.2