diff options
author | ribet | 2007-06-06 14:51:11 +0000 |
---|---|---|
committer | ribet | 2007-06-06 14:51:11 +0000 |
commit | 1a819c73ebbe6ff3309344e05648ec114ab974f0 (patch) | |
tree | b406b32fb07501c86446f29cea55ce2a72b35abe /src/MTools | |
parent | 3d6a2efdb4dabd08b849c60eed7afce9d49bacb7 (diff) | |
download | mtc-1a819c73ebbe6ff3309344e05648ec114ab974f0.zip mtc-1a819c73ebbe6ff3309344e05648ec114ab974f0.tar.gz mtc-1a819c73ebbe6ff3309344e05648ec114ab974f0.tar.bz2 mtc-1a819c73ebbe6ff3309344e05648ec114ab974f0.tar.xz |
Suppression d'un warning
Diffstat (limited to 'src/MTools')
-rw-r--r-- | src/MTools/Anim/MPath.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/MTools/Anim/MPath.pm b/src/MTools/Anim/MPath.pm index 910cfb5..27ee976 100644 --- a/src/MTools/Anim/MPath.pm +++ b/src/MTools/Anim/MPath.pm @@ -102,7 +102,7 @@ sub start { my ($self) = @_; my @points = @{$self -> mget ('path')}; - if (!defined @points || @points <= 0) {return;} + if (!@points) {return;} $self -> {__x} = $points [0] -> [0]; $self -> {__y} = $points [0] -> [1]; my $pacing = new Anim::Pacing::Linear (-duration => $self -> mget ('duration')); |