diff options
author | marion | 2007-09-24 13:24:19 +0000 |
---|---|---|
committer | marion | 2007-09-24 13:24:19 +0000 |
commit | bc5487e344dd8c4db6ae8fbb28a09d575ebd070f (patch) | |
tree | 09e0e6d25d3eea95a2f71224d71da78b911c7c02 /src | |
parent | a7bd2b66c38b625a50ab8bf85e8d8ea0be78ac8f (diff) | |
download | mtc-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')
-rw-r--r-- | src/MTools/Anim/MOpacity.pm | 6 | ||||
-rw-r--r-- | src/MTools/Anim/MPath.pm | 7 | ||||
-rw-r--r-- | src/MTools/Anim/MScalor.pm | 6 |
3 files changed, 12 insertions, 7 deletions
diff --git a/src/MTools/Anim/MOpacity.pm b/src/MTools/Anim/MOpacity.pm index cbb5571..19c2108 100644 --- a/src/MTools/Anim/MOpacity.pm +++ b/src/MTools/Anim/MOpacity.pm @@ -98,9 +98,11 @@ 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 -> {__opacity});$self -> {__animation} = undef;}, + -stopcommand => sub {$self -> {__animation} = undef; + $self -> notify ('ANIMATION_ABORD', $self -> {__opacity});}, -loop => $self -> mget ('loop'), ); $animation -> start (); 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'), ); diff --git a/src/MTools/Anim/MScalor.pm b/src/MTools/Anim/MScalor.pm index 8131b7a..8cac21e 100644 --- a/src/MTools/Anim/MScalor.pm +++ b/src/MTools/Anim/MScalor.pm @@ -105,9 +105,11 @@ 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 -> {__x}, $self -> {__y});$self -> {__animation} = undef;}, + -stopcommand => sub {$self -> {__animation} = undef; + $self -> notify ('ANIMATION_ABORD', $self -> {__x}, $self -> {__y});}, -loop => $self -> mget ('loop'), ); $animation -> start (); |