diff options
Diffstat (limited to 'src/SVG/SVG2zinc.pm')
| -rw-r--r-- | src/SVG/SVG2zinc.pm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/src/SVG/SVG2zinc.pm b/src/SVG/SVG2zinc.pm index 22d41bb..54c369c 100644 --- a/src/SVG/SVG2zinc.pm +++ b/src/SVG/SVG2zinc.pm @@ -968,16 +968,11 @@ sub image { my @RES; if (my $opacity = $attrs{'opacity'}) { - # creating an intermediate group for managing the transparency - # BUG: we could used the attribute -color := white:$opacity $opacity = &convertOpacity ($opacity); if ($opacity != 1) { - ## on cr?e un groupe pour g?rer la transparence my $opacity = &float2int(100 * $opacity); - my $newgroup = substr ($name, 0, -1) . "transparency'"; - push @RES , '$previous = '." -> add('group', $current_group, -alpha => $opacity, -tags => [ $newgroup ], -priority => 10);\n"; - $group = $newgroup; + $group .= ", -color => 'white;$opacity'"; } } my $res = ""; |