diff --git a/src/DrawResources/TestCommands.tcl b/src/DrawResources/TestCommands.tcl
index 7aeaa81428..ccc0727437 100644
--- a/src/DrawResources/TestCommands.tcl
+++ b/src/DrawResources/TestCommands.tcl
@@ -1872,6 +1872,7 @@ proc _check_file_format {file} {
 proc load_data_file {file format shape} {
     switch $format {
     BREP { uplevel restore $file $shape }
+    DRAW { uplevel restore $file $shape }
     IGES { pload XSDRAW; uplevel igesbrep $file $shape * }
     STEP { pload XSDRAW; uplevel stepread $file __a *; uplevel renamevar __a_1 $shape }
     STL  { pload XSDRAW; uplevel readstl $shape $file }
diff --git a/tests/bugs/moddata/bug23475 b/tests/bugs/moddata/bug23475
index 30150d5383..7b306f3caf 100755
--- a/tests/bugs/moddata/bug23475
+++ b/tests/bugs/moddata/bug23475
@@ -6,7 +6,7 @@ puts ""
 # Wrong result of Geom_BSpline_Surface::IsVClosed()
 ###############################################################################
 
-restore [locate_data_file bug23475.brep] s1
+restore [locate_data_file bug23475.draw] s1
 set info [dump s1]
 
 if { [regexp "BSplineSurface vclosed" $info] != 1} {
diff --git a/tests/mesh/data/standard/W5 b/tests/mesh/data/standard/W5
index 110464e795..586c0fadce 100755
--- a/tests/mesh/data/standard/W5
+++ b/tests/mesh/data/standard/W5
@@ -11,6 +11,6 @@ if { [string compare $command "shading"] == 0 } {
 } else {
   set nbwithouttri(All) 91
   set nbcross(All) 11
-  set bug_freenodes "OCC22687"
-  set nbfreenodes(All) 9
+  set bug_freenodes "OCC23473"
+  set nbfreenodes(All) 11
 }