From e1025099285bdedbac994ee17a6ab753c522cefe Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.s@egaltech.com>
Date: Thu, 3 Mar 2016 07:29:44 +0000
Subject: [PATCH] EgtGeomKernel 1.6n10 : - correzione in
 GetSurfFlatRegionFromFatCurve.

---
 EgtGeomKernel.rc | Bin 11718 -> 11734 bytes
 SfrCreate.cpp    |   6 ++++--
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/EgtGeomKernel.rc b/EgtGeomKernel.rc
index 5ca631e99f26e25417bdc22c98cd8ccc9f1da961..d6496a986252cd34aaeb50e89cb8f5c873bf64c0 100644
GIT binary patch
delta 134
zcmX>WeJy&!A2wz~27}G_`OY&<t`pLk{DV`C(Qxub4#~*{oMM}OxF)ec<!zZ!#N8M-
YPZ0KD#wpn+4VT1WvIpblBIOV+0H_fvGynhq

delta 102
zcmcZ>eJpyzA2vqI&HvdHnHeo7I|}M<4&a)^0v0*XG<ln39$eIoaq|peAD}9rVoa%7
R(oiWRb37O~Hz|j30RSrtAwmEE

diff --git a/SfrCreate.cpp b/SfrCreate.cpp
index f5952df..d121263 100644
--- a/SfrCreate.cpp
+++ b/SfrCreate.cpp
@@ -120,11 +120,13 @@ GetSurfFlatRegionFromFatCurve( ICurve* pCrv, double dRadius, bool bSquareEnds, b
    PtrOwner<CurveComposite> pCompo1( CreateBasicCurveComposite()) ;
    if ( IsNull( pCompo1)  ||  ! pCompo1->AddCurve( Release( pCurve)))
       return nullptr ;
-  // se distanza tra gli estremi minore di due volte il raggio la chiudo
+  // se distanza tra gli estremi minore di due volte il raggio la chiudo, purchè curva abbastanza lunga
+   double dLen ;
    Point3d ptStart, ptEnd ;
    pCompo1->GetStartPoint( ptStart) ;
    pCompo1->GetEndPoint( ptEnd) ;
-   if ( Dist( ptStart, ptEnd) <= 2 * dRadius)
+   pCompo1->GetLength( dLen) ;
+   if ( dLen > 2 * dRadius  &&  Dist( ptStart, ptEnd) <= 2 * dRadius)
       pCompo1->Close() ;
   // tipo di offset
    int nOffsType = ( bSquareMids ? ICurve::OFF_EXTEND : ICurve::OFF_FILLET) ;