0029528: Visualization, TKOpenGl - allow defining sRGB textures
[occt.git] / tests / bugs / vis / bug26217
index 047f706..4d265c3 100644 (file)
@@ -17,17 +17,11 @@ vcircle circle radP1 radP2 radP3 1
 vfit
 
 vselect 40 120 185 320
-set aColor [vreadpixel 120 200 rgb name]
-if {$aColor != "DARKGOLDENROD3"} {
-  puts "ERROR: the circle is selected with no overlap mode activated"
-}
+if {[vreadpixel 120 200 rgb name] != "DARKGOLDENROD"} { puts "ERROR: the circle is selected with no overlap mode activated" }
 
 vselect 0 0
 
 vselect 40 120 185 320 -allowoverlap 1
-set aColor [vreadpixel 120 200 rgb name]
-if {$aColor != "GRAY66"} {
-  puts "ERROR: the circle is not selected with overlap mode activated"
-}
+if {[vreadpixel 120 200 rgb name] != "GRAY73"} { puts "ERROR: the circle is not selected with overlap mode activated" }
 
 vdump ${imagedir}/${casename}.png