0025803: Defective tests contaminating current directory

[occt.git] / tests / bugs / fclasses / bug24931

diff --git a/tests/bugs/fclasses/bug24931 b/tests/bugs/fclasses/bug24931
index cd55837..7ccdf2d 100644 (file)
--- a/tests/bugs/fclasses/bug24931
+++ b/tests/bugs/fclasses/bug24931
@@ -8,7 +8,10 @@ puts ""
 
 pload QAcommands
 
-set info [OCC24931]
+set FilePath ${imagedir}/bug24931_testdocument.xml
+
+file delete -force ${FilePath}
+set info [OCC24931 ${FilePath}]
 
 if { [regexp "OK" $info] != 1 } {
   puts "Error: Stack is overflow"