diff options
| author | ribet | 2010-05-11 13:05:47 +0000 |
|---|---|---|
| committer | ribet | 2010-05-11 13:05:47 +0000 |
| commit | 8ff58f98a8bc30dbd6bd6505028df19cd05a1945 (patch) | |
| tree | 5e23ece85279f18e9f9859d5d5460ec2f7c9b234 /src/MTools | |
| parent | 1b12ab052c0cdfa5cea4aac0e2362212b56b443d (diff) | |
| download | mtc-8ff58f98a8bc30dbd6bd6505028df19cd05a1945.zip mtc-8ff58f98a8bc30dbd6bd6505028df19cd05a1945.tar.gz mtc-8ff58f98a8bc30dbd6bd6505028df19cd05a1945.tar.bz2 mtc-8ff58f98a8bc30dbd6bd6505028df19cd05a1945.tar.xz | |
Comment
Diffstat (limited to 'src/MTools')
| -rw-r--r-- | src/MTools/Widget/MBouton.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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); |