From: dcq <dcq@opencascade.com>
Date: Fri, 16 Apr 2004 12:54:02 +0000 (+0000)
Subject: DCQ : Debug ClearAllIOR method
X-Git-Tag: Ecole_Ete_a2~8
X-Git-Url: http://git.salome-platform.org/gitweb/?a=commitdiff_plain;h=6a0250ccdf0b67d75ec68c7b91a00d82cc81b335;p=modules%2Fgeom.git

DCQ : Debug ClearAllIOR method
---

diff --git a/src/GEOMDS/GEOMDS_Commands.cxx b/src/GEOMDS/GEOMDS_Commands.cxx
index 17f7e5764..d2fa1c38e 100644
--- a/src/GEOMDS/GEOMDS_Commands.cxx
+++ b/src/GEOMDS/GEOMDS_Commands.cxx
@@ -264,9 +264,10 @@ Standard_Boolean GEOMDS_Commands::ClearAllIOR(const TDF_Label& aLabel)
     TDF_Label L = it.Value() ;
     if( L.FindAttribute(TDataStd_Name::GetID(), anAttName) ) {
       notTested = L.ForgetAttribute(TDataStd_Name::GetID()) ;
+      if(notTested)
+	MESSAGE("in GEOMDS_Commands::ClearAllIOR : IOR CLEARED" )
+    ClearAllIOR(L);
     }
-    if(notTested)
-      MESSAGE("in GEOMDS_Commands::ClearAllIOR : IOR CLEARED" )
   }
   return true ;
 }