0027457: Modeling - Raise exception if scaled transformation is used for shape location

[occt.git] / src / XCAFPrs / XCAFPrs.cxx

diff --git a/src/XCAFPrs/XCAFPrs.cxx b/src/XCAFPrs/XCAFPrs.cxx
index 54d449c..e7ff3a3 100644 (file)
--- a/src/XCAFPrs/XCAFPrs.cxx
+++ b/src/XCAFPrs/XCAFPrs.cxx
@@ -95,7 +95,7 @@ static Standard_Boolean getShapesOfSHUO (TopLoc_IndexedMapOfLocation& theaPrevLo
         l--;
       }
     }
-    aSHUO_NUSh.Location( SupcompLoc );
+    aSHUO_NUSh.Location( SupcompLoc, Standard_False );
     theSHUOShapeSeq.Append( aSHUO_NUSh );
   }
   return (theSHUOShapeSeq.Length() > 0);
@@ -295,7 +295,7 @@ void XCAFPrs::CollectStyleSettings (const TDF_Label& theLabel,
         continue;
       }
     }
-    aSubshape.Move (theLoc);
+    aSubshape.Move (theLoc, Standard_False);
     XCAFPrs_Style* aMapStyle = theSettings.ChangeSeek (aSubshape);
     if (aMapStyle == NULL)
       theSettings.Add (aSubshape, aStyle);