From 4cf6ece050adcf0ae832f44b82cdeb65ec923245 Mon Sep 17 00:00:00 2001
From: skl <skl@opencascade.com>
Date: Fri, 4 May 2007 08:57:42 +0000
Subject: [PATCH] Updated for PAL14857.

---
 src/GEOMImpl/GEOMImpl_PipeDriver.cxx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/GEOMImpl/GEOMImpl_PipeDriver.cxx b/src/GEOMImpl/GEOMImpl_PipeDriver.cxx
index 999117942..ea9d3acbb 100644
--- a/src/GEOMImpl/GEOMImpl_PipeDriver.cxx
+++ b/src/GEOMImpl/GEOMImpl_PipeDriver.cxx
@@ -438,7 +438,7 @@ static TopoDS_Shape CreatePipeForShellSections(const TopoDS_Wire& aWirePath,
   TopTools_SequenceOfShape tmpEdges;
   for(i=1; i<=Edges.Length() && jcurr<nbLocs; i++) {
     TopoDS_Edge E = TopoDS::Edge(Edges.Value(i));
-    tol = BRep_Tool::Tolerance(edge);
+    tol = BRep_Tool::Tolerance(E);
     TopoDS_Vertex V1 = sae.FirstVertex(E);
     TopoDS_Vertex V2 = sae.LastVertex(E);
     gp_Pnt P1 = BRep_Tool::Pnt(V1);
@@ -509,7 +509,7 @@ static TopoDS_Shape CreatePipeForShellSections(const TopoDS_Wire& aWirePath,
 	Edges.InsertAfter(i,E2);
       }
       else {
-	tmpEdges.Append(edge);
+	tmpEdges.Append(E);
       }
     }
   }
-- 
2.39.2