diff options
Diffstat (limited to 'doc/exemple_opacite.pl')
| -rwxr-xr-x | doc/exemple_opacite.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/doc/exemple_opacite.pl b/doc/exemple_opacite.pl index f52da49..216c10b 100755 --- a/doc/exemple_opacite.pl +++ b/doc/exemple_opacite.pl @@ -19,6 +19,8 @@ BEGIN { unshift @INC, ".", "../src"; } +use strict; + use MTools; use MTools::GUI::MRect; use MTools::GUI::MGroup; @@ -26,8 +28,7 @@ use MTools::Anim::MOpacity; new MTools (800, 600, "Exemple de animation opacity"); -new MTools::GUI::MRect (1, 400, 200, 100, 300, -filled => 1, -fillcolor => red -); +new MTools::GUI::MRect (1, 400, 200, 100, 300, -filled => 1, -fillcolor => "red"); my $group = new MTools::GUI::MGroup (1); new MTools::GUI::MRect ($group, 300, 300, 300, 100, -filled => 1); |