From 026e394a8e78c52c9c3319408f1b1b66e88a745b Mon Sep 17 00:00:00 2001
From: saal
Date: Mon, 4 Jun 2007 13:10:07 +0000
Subject: utilisation du constructeur de MObjet + suppression du use
 MTools::MObjet

---
 src/MTools/Comp/MFocuser.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src/MTools/Comp/MFocuser.pm')

diff --git a/src/MTools/Comp/MFocuser.pm b/src/MTools/Comp/MFocuser.pm
index cb821ae..7d984da 100644
--- a/src/MTools/Comp/MFocuser.pm
+++ b/src/MTools/Comp/MFocuser.pm
@@ -26,7 +26,6 @@ package MTools::Comp::MFocuser;
 
 use strict;
 use MTools;
-use MTools::MObjet;
 
 use vars qw /@ISA/;
 
@@ -39,7 +38,7 @@ use Tk;
 
 sub new {
 	my ($class, @targets) = @_;
-	my $self = {};
+	my $self = new MTools::MObjet ();
 	bless $self, $class;
 	
 	$self -> recordEvent ('GET_FOCUS');
-- 
cgit v1.1