diff --git a/src/BRepToIGES/BRepToIGES_BRShell.cxx b/src/BRepToIGES/BRepToIGES_BRShell.cxx
index c0885f7609..9d2003a2bb 100644
--- a/src/BRepToIGES/BRepToIGES_BRShell.cxx
+++ b/src/BRepToIGES/BRepToIGES_BRShell.cxx
@@ -198,6 +198,10 @@ Handle(IGESData_IGESEntity) BRepToIGES_BRShell ::TransferFace(const TopoDS_Face&
         else {
           B.UpdateEdge(anEdge, aCurve1, myface, aTol);
         }
+        // set range for degenerated edges
+        if (BRep_Tool::Degenerated(anEdge)) {
+          B.Range(anEdge, myface, f, l);
+        }
       }
     }
   }
diff --git a/tests/bugs/iges/bug26989 b/tests/bugs/iges/bug26989
new file mode 100644
index 0000000000..615e1f42a4
--- /dev/null
+++ b/tests/bugs/iges/bug26989
@@ -0,0 +1,9 @@
+#########################################################################################
+# OCC26989: [Regression in 6.9.0] Export of a reversed face leads to wrong data in 6.9.0
+#########################################################################################
+
+restore [locate_data_file bug26989.brep] a
+newmodel
+brepiges a ${imagedir}/bug26989.igs
+igesbrep ${imagedir}/bug26989.igs result *
+checkprops result -s 56.5487