0030991: Draw Harness - ViewerTest::ParseColor() defines out-of-range alpha component

[occt.git] / samples / tcl / materials.tcl

diff --git a/samples/tcl/materials.tcl b/samples/tcl/materials.tcl
index 2ea7a7a..e377752 100644 (file)
--- a/samples/tcl/materials.tcl
+++ b/samples/tcl/materials.tcl
@@ -86,3 +86,4 @@ drawObjects 0 ""
 drawObjects 1 red
 drawObjects 2 green
 drawObjects 3 blue1
+vrepaint