tests/bugs/vis/bug25773

   1 puts "============"
   2 puts "CR25773"
   3 puts "Check that properties of object can be applied to it (set to its drawer)"
   4 puts "============"
   5 puts ""
   6
   7 vinit View1
   8 vclear
   9
  10 vaspects -defaults -setfreeboundarycolor 0 0 1
  11
  12 pcone c 0 5 10
  13 explode c F
  14 vdisplay c_1; vfit
  15
  16 set x 80
  17 set y 103
  18 checkcolor $x $y 0 0 1
  19
  20 vaspects c_1 -freeboundary off
  21 checkcolor $x $y 0 0 0
  22
  23 vaspects c_1 -freeboundary on -setfreeboundarycolor 1 0 0 -setfreeboundarywidth 2
  24 checkcolor $x $y 1 0 0
  25
  26 checkview -screenshot -3d -path ${imagedir}/${test_image}.png