diff --git a/Geo/OCCFace.cpp b/Geo/OCCFace.cpp
index c35b69731fa41ed50679f155f142baf65d8d26a6..ac730b90642d0fcd6e64f391128d66f35529e339 100644
--- a/Geo/OCCFace.cpp
+++ b/Geo/OCCFace.cpp
@@ -60,7 +60,7 @@ void OCCFace::setup()
   l_edges.clear();
   l_dirs.clear();
   TopExp_Explorer exp2, exp3;
-  for(exp2.Init(s, TopAbs_WIRE); exp2.More(); exp2.Next()){
+  for(exp2.Init(s.Oriented(TopAbs_FORWARD), TopAbs_WIRE); exp2.More(); exp2.Next()){
     TopoDS_Wire wire = TopoDS::Wire(exp2.Current());
     Msg::Debug("OCC Face %d - New Wire", tag());
     std::list<GEdge*> l_wire;