Fix bug 13058: 'Remove webs' functionality works incorrectly.

diff --git a/src/GEOMImpl/GEOMImpl_IBooleanOperations.cxx b/src/GEOMImpl/GEOMImpl_IBooleanOperations.cxx
index 8c71c551c5df87635f2a432b7ff877495a4b722d..f6a022bb5f3d2d7a3e770df27de2e2ed2f77d419 100644 (file)
--- a/src/GEOMImpl/GEOMImpl_IBooleanOperations.cxx
+++ b/src/GEOMImpl/GEOMImpl_IBooleanOperations.cxx
@@ -251,6 +251,7 @@ Handle(GEOM_Object) GEOMImpl_IBooleanOperations::MakePartition
     if (theMaterials.IsNull()) {
       Handle(TColStd_HArray1OfInteger) aMaterials =
         new TColStd_HArray1OfInteger (1, aShapesSeq->Length());
+      aMaterials->Init(0);
       aCI.SetMaterials(aMaterials);
     } else {
       aCI.SetMaterials(theMaterials);