diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/MTools/MState.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/MTools/MState.pm b/src/MTools/MState.pm index bf7b9d4..0dfef7e 100644 --- a/src/MTools/MState.pm +++ b/src/MTools/MState.pm @@ -31,7 +31,7 @@ BEGIN sub new { my ($class, %options) = @_; - my $self = {}; + my $self = new MTools::MObjet (); bless $self, $class; $self -> {instance} = -1; my %events = %{$options {events}}; |