diff options
Diffstat (limited to 'src/MTools/Anim/MPath.pm')
| -rw-r--r-- | src/MTools/Anim/MPath.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/MTools/Anim/MPath.pm b/src/MTools/Anim/MPath.pm index f6213f7..57fd846 100644 --- a/src/MTools/Anim/MPath.pm +++ b/src/MTools/Anim/MPath.pm @@ -138,6 +138,13 @@ sub stop { } } +sub complete { + my ($self) = @_; + return if !$self->isRunning(); + $self->__event(100); + $self->stop(); +} + sub __getPoint { my ($self, $percentage) = @_; my @points = @{$self -> mget ('path')}; |