aboutsummaryrefslogtreecommitdiff
path: root/src/MTools/Anim/MPath.pm
diff options
context:
space:
mode:
authormarion2007-09-24 13:24:19 +0000
committermarion2007-09-24 13:24:19 +0000
commitbc5487e344dd8c4db6ae8fbb28a09d575ebd070f (patch)
tree09e0e6d25d3eea95a2f71224d71da78b911c7c02 /src/MTools/Anim/MPath.pm
parenta7bd2b66c38b625a50ab8bf85e8d8ea0be78ac8f (diff)
downloadmtc-bc5487e344dd8c4db6ae8fbb28a09d575ebd070f.zip
mtc-bc5487e344dd8c4db6ae8fbb28a09d575ebd070f.tar.gz
mtc-bc5487e344dd8c4db6ae8fbb28a09d575ebd070f.tar.bz2
mtc-bc5487e344dd8c4db6ae8fbb28a09d575ebd070f.tar.xz
Correction de endcommand,stopcommand de certaines classes du repertoire Anim
Diffstat (limited to 'src/MTools/Anim/MPath.pm')
-rw-r--r--src/MTools/Anim/MPath.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/MTools/Anim/MPath.pm b/src/MTools/Anim/MPath.pm
index 6d73cff..f6213f7 100644
--- a/src/MTools/Anim/MPath.pm
+++ b/src/MTools/Anim/MPath.pm
@@ -117,12 +117,13 @@ sub start {
-resources => [
$animationpath,
-command => sub { $self -> __event (@_)},
- -endcommand => sub {$self -> notify ('ANIMATION_END');
- $self -> {__animation} = undef;},
+ -endcommand => sub {$self -> {__animation} = undef;
+ $self -> notify ('ANIMATION_END');
+ },
],
-stopcommand => sub {
- $self -> notify ('ANIMATION_ABORD', $self -> __getPoint ($self -> {__percentage}));
$self -> {__animation} = undef;
+ $self -> notify ('ANIMATION_ABORD', $self -> __getPoint ($self -> {__percentage}));
},
-loop => $self -> mget ('loop'),
);