diff options
Diffstat (limited to 'src/MTools/Anim/MTranslator.pm')
| -rw-r--r-- | src/MTools/Anim/MTranslator.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/MTools/Anim/MTranslator.pm b/src/MTools/Anim/MTranslator.pm index c50aef9..734f42b 100644 --- a/src/MTools/Anim/MTranslator.pm +++ b/src/MTools/Anim/MTranslator.pm @@ -155,7 +155,14 @@ sub event { } else { - $targets [$i] -> translate ($x - $self -> {__x}, $y - $self -> {__y}); + if (ref($targets [$i]) eq '') + { + translate ($targets [$i], $x - $self -> {__x}, $y - $self -> {__y}); + } + else + { + $targets [$i] -> translate ($x - $self -> {__x}, $y - $self -> {__y}); + } } } $self -> {__x} = $x; |