[Magick-bugs] IM 6.3.5-6 Q16 windows dll. Composite ignores mask's alpha channel

[Walter Higgins]

Hi,

I'm using IM6.3.5-6 Q16 windows dll.

Alpha support in the Composite() subroutine (I'm using PerlMagick)
seems to be broken. 

Please take a look at the following script and the images it produces.
You can see from the output images that the gradient in the mask is
effectively ignored. The mask is reduced to a single black-white mask.
Can you let me know when a fix for this will be available ?
This problem came up before and was fixed but is back in 6.3.5-6

Walter


use strict;
use Image::Magick;


my @compose_modes = qw(Add Atop Blend Bumpmap Clear ColorBurn
ColorDodge Colorize CopyBlack CopyBlue CopyCyan CopyGreen Copy
CopyMagenta CopyOpacity CopyRed CopyYellow Darken Dst Difference
Displace Dissolve DstAtop DstIn DstOut DstOver Dst Exclusion HardLight
Hue In Lighten Luminize Minus Modulate Multiply None Out Overlay Over
Plus Saturate Screen SoftLight Src SrcAtop SrcIn SrcOut SrcOver Src
Subtract Threshold Xor);


my $mask = new Image::Magick;
  
$mask->Set(size=>"94x94");
$mask->Read("gradient:");
$mask->Write(filename=>"gradient_mask.png");

foreach (@compose_modes){

  my $tile_aqua = new Image::Magick;
  my $tile_water = new Image::Magick;
  
  $tile_aqua->Read(filename=>"tile_aqua.jpg");
  $tile_water->Read(filename=>"tile_water.jpg");
  

  my $imres = $tile_aqua->Composite(image=>$tile_water,
												mask=>$mask);
  die $imres if ($imres);
  
  $imres = $tile_aqua->Write(filename=>"compose_$_.jpg");
  die $imres if ($imres);
}



      ____________________________________________________________________________________
Shape Yahoo! in your own image.  Join our Network Research Panel today!   http://surveylink.yahoo.com/gmrs/yahoo_panel_invite.asp?a=7