diff options
Diffstat (limited to 'src/MTools/Anim')
| -rw-r--r-- | src/MTools/Anim/MTranslator.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/MTools/Anim/MTranslator.pm b/src/MTools/Anim/MTranslator.pm index 320c17c..c50aef9 100644 --- a/src/MTools/Anim/MTranslator.pm +++ b/src/MTools/Anim/MTranslator.pm @@ -37,7 +37,6 @@ package MTools::Anim::MTranslator; use strict; use MTools; -use MTools::MObjet; use Anim; use Anim::Pacing::Linear; @@ -54,7 +53,7 @@ use Tk; sub new { my ($class, %options) = @_; - my $self = {}; + my $self = new MTools::MObjet (); bless $self, $class; $self -> recordProperty ('-visible', 0); |