352ffd73 |
1 | puts "==================================" |
2 | puts "BUC60569" |
3 | puts "OCC597" |
4 | puts "==================================" |
5 | puts "It takes visual check for this BUG" |
6 | puts "==================================" |
7 | puts "" |
8 | |
9 | restore [locate_data_file buc60569a.rle] result |
10 | tclean result |
11 | vinit |
c398b00e |
12 | vhighlightselected 0 |
352ffd73 |
13 | checkshape result |
14 | |
15 | BUC60569 result |
16 | vfit |
4754e164 |
17 | vselect 250 190 |
18 | vselect 180 350 1 |
19 | vmoveto 250 190 |
352ffd73 |
20 | |
21 | set x_coord 335 |
22 | set y_coord 331 |
23 | |
24 | checkcolor $x_coord $y_coord 0.8 0.8 0.8 |
25 | |
26 | if {$stat != 1} { |
27 | puts "Error : The right face is highlighted by Move To command." |
28 | } |
29 | |
5747059b |
30 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |