From 8ff58f98a8bc30dbd6bd6505028df19cd05a1945 Mon Sep 17 00:00:00 2001 From: ribet Date: Tue, 11 May 2010 13:05:47 +0000 Subject: Comment --- src/MTools/Widget/MBouton.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/MTools/Widget') diff --git a/src/MTools/Widget/MBouton.pm b/src/MTools/Widget/MBouton.pm index acabe65..07736c8 100644 --- a/src/MTools/Widget/MBouton.pm +++ b/src/MTools/Widget/MBouton.pm @@ -43,7 +43,7 @@ sub new { my $eventOff = defined $options {e_release} ? $options {e_release} : 'RELEASED'; my $cb = $options {call} if (defined $options {call}); - $self -> recordEvent ('MAINTAIN_DOWN'); + $self -> recordEvent ('MAINTAIN_DOWN'); #utiliser les variables $eventOn? $self -> recordEvent ('PRESS'); $self -> recordEvent ('RELEASE'); $self -> mconfigure (-atomic => 1); -- cgit v1.1