0028747: Incorrect result of the section operation after edge refinement

[occt.git] / src / BRepTest / BRepTest_FilletCommands.cxx

diff --git a/src/BRepTest/BRepTest_FilletCommands.cxx b/src/BRepTest/BRepTest_FilletCommands.cxx
index 498406c..70dafa6 100644 (file)
--- a/src/BRepTest/BRepTest_FilletCommands.cxx
+++ b/src/BRepTest/BRepTest_FilletCommands.cxx
@@ -179,9 +179,12 @@ static Standard_Integer BLEND(Draw_Interpretor& di, Standard_Integer narg, const
   if(!Rakk->IsDone()) return 1;
 
   // Save history for fillet
-  TopTools_ListOfShape anArg;
-  anArg.Append(V);
-  BRepTest_Objects::SetHistory(anArg, *Rakk);
+  if (BRepTest_Objects::IsHistoryNeeded())
+  {
+    TopTools_ListOfShape anArg;
+    anArg.Append(V);
+    BRepTest_Objects::SetHistory(anArg, *Rakk);
+  }
 
   TopoDS_Shape res = Rakk->Shape();
   DBRep::Set(a[1],res);