From 0931435ae6a27cfa5ae1f1bbc7a5c390c405231c Mon Sep 17 00:00:00 2001 From: saal Date: Wed, 6 Jun 2007 07:54:32 +0000 Subject: utilisation du constructeur de la classe mère --- src/MTools/MState.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/MTools/MState.pm') 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}}; -- cgit v1.1