diff options
-rw-r--r-- | src/MTools/Comp/MInertie.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/MTools/Comp/MInertie.pm b/src/MTools/Comp/MInertie.pm index 2faa1b9..c9cbbdd 100644 --- a/src/MTools/Comp/MInertie.pm +++ b/src/MTools/Comp/MInertie.pm @@ -138,7 +138,7 @@ sub inertie { my $rate = $self -> mget ('rate'); $self -> {__vx} *= $rate; $self -> {__vy} *= $rate; - if ((abs $self -> {__vx} <= 2) and (abs $self -> {__vy} <= 2)) { + if ((abs $self -> {__vx} <= 1) and (abs $self -> {__vy} <= 1)) { $self -> interrupt (); return; } |