diff options
Diffstat (limited to 'src/MTools/Anim/MOpacity.pm')
| -rw-r--r-- | src/MTools/Anim/MOpacity.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/MTools/Anim/MOpacity.pm b/src/MTools/Anim/MOpacity.pm index d7aba19..cbb5571 100644 --- a/src/MTools/Anim/MOpacity.pm +++ b/src/MTools/Anim/MOpacity.pm @@ -129,7 +129,14 @@ sub __event { } for (my $i = 0; $i < @targets; $i++) { - $targets [$i] -> mconfigure ('-alpha' => $opacity); + if (ref($targets [$i]) eq '') + { + mconfigure ($targets[$i], '-alpha' => $opacity); + } + else + { + $targets [$i] -> mconfigure ('-alpha' => $opacity); + } } $self -> {__opacity} = $opacity; $self -> notify ('OPACITY_CHANGED', $opacity); |