X-Git-Url: http://git.dev.opencascade.org/gitweb/?p=occt.git;a=blobdiff_plain;f=samples%2Ftcl%2Fmaterials.tcl;h=e377752465bdc583adcc302d2786d4178fde634e;hp=c3d48678503663a3ec0d09a49f9de45d7e6867da;hb=9196ea9d5ad4190294cff17c67ccdfdba3ee6f1b;hpb=f2b42160f4202fa0848448b643965f80b351cb7b

diff --git a/samples/tcl/materials.tcl b/samples/tcl/materials.tcl
index c3d4867850..e377752465 100644
--- a/samples/tcl/materials.tcl
+++ b/samples/tcl/materials.tcl
@@ -69,7 +69,7 @@ vclose ALL
 vinit View1 w=768 h=768
 vtop
 vglinfo
-vsetgradientbg 180 200 255 180 180 180 2
+vbackground -gradient 0.705882 0.784314 1  0.705882 0.705882 0.705882 -gradientMode VERTICAL
 
 vlight -change 0 -dir 0.577 -0.577 -0.577
 vrenderparams -msaa 8
@@ -86,3 +86,4 @@ drawObjects 0 ""
 drawObjects 1 red
 drawObjects 2 green
 drawObjects 3 blue1
+vrepaint