0021868: EDF GEOM : Bug with "What is"

diff --git a/src/GEOMAlgo/GEOMAlgo_ShapeInfoFiller.cxx b/src/GEOMAlgo/GEOMAlgo_ShapeInfoFiller.cxx
index a599ca89e864feb4378383859ca32c5eb1487344..5bfdb55cbda954aa0e711854c13c89008e7d1e77 100644 (file)
--- a/src/GEOMAlgo/GEOMAlgo_ShapeInfoFiller.cxx
+++ b/src/GEOMAlgo/GEOMAlgo_ShapeInfoFiller.cxx
@@ -570,9 +570,11 @@ void GEOMAlgo_ShapeInfoFiller::FillEdge(const TopoDS_Shape& aS)
     aPc.SetXYZ(aXYZc);
     aInfo.SetLocation(aPc);
     //
-    gp_Vec aVec(aPc, aP2);
-    gp_Dir aDir(aVec);
-    aInfo.SetDirection(aDir);
+    if ( aLength >= gp::Resolution() ) {
+      gp_Vec aVec(aPc, aP2);
+      gp_Dir aDir(aVec);
+      aInfo.SetDirection(aDir);
+    }
   }
   //modified by NIZNHY-PKV Tue Jul 03 10:19:06 2012t
   // Line