1 files changed, 1 insertions, 2 deletions
diff --git a/src/MTools/Comp/MMover.pm b/src/MTools/Comp/MMover.pm
index 2d767ff..0d2628c 100644
--- a/src/MTools/Comp/MMover.pm
+++ b/src/MTools/Comp/MMover.pm
@@ -31,7 +31,6 @@ package MTools::Comp::MMover;
 
 use strict;
 use MTools;
-use MTools::MObjet;
 
 use vars qw /@ISA/;
 
@@ -44,7 +43,7 @@ use Tk;
 
 sub new {
 	my ($class, $src, $targets, $button, %options) = @_;
-	my $self = {};
+	my $self = new MTools::MObjet ();
 	bless $self, $class;
 
 	$self -> recordProperty ('x_min', -10000);