diff options
author | marion | 2007-07-24 14:44:41 +0000 |
---|---|---|
committer | marion | 2007-07-24 14:44:41 +0000 |
commit | 4fd9ef49bb8f41ec1583dda78d424ded7f929556 (patch) | |
tree | 268a5041c9d1aa2fd061cefa0b1e142c7b811178 /src/MTools/Transform | |
parent | f5b7ac537a6e5fbe9316dd29f7b6a73e2606d2d9 (diff) | |
download | mtc-4fd9ef49bb8f41ec1583dda78d424ded7f929556.zip mtc-4fd9ef49bb8f41ec1583dda78d424ded7f929556.tar.gz mtc-4fd9ef49bb8f41ec1583dda78d424ded7f929556.tar.bz2 mtc-4fd9ef49bb8f41ec1583dda78d424ded7f929556.tar.xz |
Correction pour une initialisation correcte
Diffstat (limited to 'src/MTools/Transform')
-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; } |