diff options
Diffstat (limited to 'exemples/Target.pm')
| -rw-r--r-- | exemples/Target.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/exemples/Target.pm b/exemples/Target.pm index c2fb566..a79fa95 100644 --- a/exemples/Target.pm +++ b/exemples/Target.pm @@ -21,19 +21,19 @@ use MTools; use vars qw /@ISA/; -use MTools::MGroup; +use MTools::GUI::MGroup; use MTools::GUI::MText; use MTools::GUI::MCircle; BEGIN { - @ISA = qw /MTools::MGroup/; + @ISA = qw /MTools::GUI::MGroup/; } sub new { my ($class, $parent, $x, $y) = @_; - my $self = new MTools::MGroup ($parent, -atomic => 1); + my $self = new MTools::GUI::MGroup ($parent, -atomic => 1); bless $self, $class; my $ob = new MTools::GUI::MCircle ($self, $x, $y, 20, -filled => 1); |