diff options
Diffstat (limited to 'src/MTools')
| -rw-r--r-- | src/MTools/Transform/MRotation.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/MTools/Transform/MRotation.pm b/src/MTools/Transform/MRotation.pm index 16b405a..f019bdb 100644 --- a/src/MTools/Transform/MRotation.pm +++ b/src/MTools/Transform/MRotation.pm @@ -37,6 +37,7 @@ sub new { if (!defined $x) {$x = 0;} if (!defined $y) {$y = 0;} if (!defined $angle) {$angle = 0;} + $self -> {__current_angle} = 0; $self -> recordProperty ('-visible', 0); $self -> recordProperty ('target', $target); @@ -58,7 +59,6 @@ sub new { my ($src, $key, $val) = @_; $self -> __rotate ($val); }); - $self -> {__current_angle} = 0; $self -> __rotate ($angle); return $self; } |