diff options
Diffstat (limited to 'src/MTools/Comp/MFocuser.pm')
-rw-r--r-- | src/MTools/Comp/MFocuser.pm | 3 |
1 files changed, 1 insertions, 2 deletions
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'); |