tests/bugs/vis/bug23525

   1 puts "======="
   2 puts "CR23525"
   3 puts "======="
   4 puts ""
   5
   6 ########################################
   7 ## Disappearing of highlight in screenshot
   8 ########################################
   9
  10 vinit
  11 vclear
  12 box t_box 100 100 100
  13 vdisplay t_box
  14 vfit
  15
  16 set x_coord 110
  17 set y_coord 352
  18
  19 vmoveto 0 0
  20
  21 # EDGE ON
  22 vselmode 2 1
  23
  24 vmoveto $x_coord $y_coord
  25
  26 checkcolor $x_coord $y_coord 0 1 1
  27
  28 checkview -screenshot -3d -path ${imagedir}/${test_image}.png