tests/bugs/vis/bug30922

   1 puts "============="
   2 puts "0030922: Visualization - OpenGl_Text wrong local transformation if text has not own attach point"
   3 puts "============="
   4
   5 vfont add [locate_data_file DejaVuSans.ttf] SansFont
   6
   7 vinit View1
   8 vtrihedron trihedr
   9
  10 vdrawtext Text "First line\nSecond line" -pos 10 0 0 -color red -plane 1 0 0 0 1 0 -flipping -halign center -valign top -height 50 -font SansFont
  11 vright
  12 vlocation Text -translate 0 10 150
  13
  14 if {[vreadpixel 106 232 rgb name] == "RED"} { puts "ERROR: the text is not moved" }
  15
  16 vdump $imagedir/${casename}.png