diff --git a/tests/bugs/vis/bug24130 b/tests/bugs/vis/bug24130
index b0ed66845a..f5cb0a2cd4 100644
--- a/tests/bugs/vis/bug24130
+++ b/tests/bugs/vis/bug24130
@@ -1,4 +1,4 @@
-puts "TODO OCC24130 Debian60-64: OCCT was compiled without OpenCL support!"
+puts "TODO ?OCC24130 Debian60-64: OCCT was compiled without OpenCL support!"
 puts "TODO ?OCC24130 Windows: TKOpenGl | Type\: Error | ID\: 0 | Severity\: High | Message\:"
 
 puts "========"
diff --git a/tests/demo/samples/bottle b/tests/demo/samples/bottle
index e61d00df36..da284e662d 100644
--- a/tests/demo/samples/bottle
+++ b/tests/demo/samples/bottle
@@ -1,3 +1,5 @@
+puts "TODO ?OCC24130 Windows: TKOpenGl | Type\: Error | ID\: 0 | Severity\: High | Message\:"
+
 # test for creation of bottle as in tutorial (script is in samples)
 source $env(CASROOT)/samples/tcl/bottle.tcl