From 84ac02a52d8eb2f5ab12815091e5590c3504fee3 Mon Sep 17 00:00:00 2001 From: bouyssou Date: Wed, 10 Sep 2008 11:35:10 +0000 Subject: Suppression de l'evt MOVED_OUT_OF_BOUNDS --- src/MTools/Comp/MMover.pm | 4 ---- 1 file changed, 4 deletions(-) (limited to 'src/MTools/Comp') diff --git a/src/MTools/Comp/MMover.pm b/src/MTools/Comp/MMover.pm index a2a5b9c..56eb531 100644 --- a/src/MTools/Comp/MMover.pm +++ b/src/MTools/Comp/MMover.pm @@ -66,8 +66,6 @@ sub new { $self -> recordEvent ('PRESSED_OFF'); $self -> recordEvent ('MOVED_OFF'); $self -> recordEvent ('RELEASED_OFF'); - $self -> recordEvent ('MOVED_OUT_OF_BOUNDS'); - $button = 1 if ! defined $button; binding ($src, "", [\&__pressed, $self, Ev('x'), Ev('y'), Ev('t')]); @@ -172,7 +170,6 @@ sub __moved { } if( $dx == 0 && $dy == 0 ) { - $self -> notify ('MOVED_OUT_OF_BOUNDS', $x, $y, $t); return; } my $allower = $self -> mget ('allower'); @@ -185,7 +182,6 @@ sub __moved { $dy -= $ddy; if( $dx == 0 && $dy == 0 ) { - $self -> notify ('MOVED_OUT_OF_BOUNDS', $x, $y, $t); return; } } -- cgit v1.1