diff --git a/Geo/OCCRegion.cpp b/Geo/OCCRegion.cpp
index b038019dc8bb4ab93a7ac5dff4c33a857b15def3..42a1280a33b15b841d9d642defd892b76616b7b7 100644
--- a/Geo/OCCRegion.cpp
+++ b/Geo/OCCRegion.cpp
@@ -50,6 +50,20 @@ void OCCRegion::setup()
     }
   }
 
+  for (exp3.Init(s, TopAbs_EDGE); exp3.More(); exp3.Next()){
+    TopoDS_Edge edge = TopoDS::Edge(exp3.Current());
+    GEdge *e = model()->getOCCInternals()->getOCCEdgeByNativePtr(model(), edge);
+    if (!e){
+      Msg::Error("Unknown edge in face %d", tag());
+    }
+    else if (edge.Orientation() == TopAbs_INTERNAL){
+      Msg::Info("Adding embedded edge %d", e->tag());
+      embedded_edges.push_back(e);
+      OCCEdge *occe = (OCCEdge*)e;
+      //occe->setTrimmed(this);
+    }
+  }
+
   Msg::Debug("OCC Region %d with %d faces", tag(), l_faces.size());
 }