From 051a65748ecbc0bd52e838f9fd618eaa073f650a Mon Sep 17 00:00:00 2001
From: dmv <dmv@opencascade.com>
Date: Thu, 10 Dec 2009 14:15:54 +0000
Subject: [PATCH] IPAL21354	Deleting of referenced father object doesn't
 work.

---
 src/GEOMToolsGUI/GEOMToolsGUI.cxx | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/src/GEOMToolsGUI/GEOMToolsGUI.cxx b/src/GEOMToolsGUI/GEOMToolsGUI.cxx
index 521e92e1b..8aa0fd14b 100644
--- a/src/GEOMToolsGUI/GEOMToolsGUI.cxx
+++ b/src/GEOMToolsGUI/GEOMToolsGUI.cxx
@@ -490,8 +490,11 @@ void GEOMToolsGUI::OnEditDelete()
 	
     // check if object is reference
     _PTR(SObject) refobj;
-    if ( obj && obj->ReferencedObject( refobj ) )
-      continue; // skip references
+    if ( obj && obj->ReferencedObject( refobj ) ) {
+      // get the main object by reference IPAL 21354
+      obj = refobj;
+      entry = obj->GetID().c_str();
+    }
     // ...
     QString aName = obj->GetName().c_str();
     if ( entry == geomComp ) {
-- 
2.39.2