From eecd2464df290714408e63af3d6331dcedd2f540 Mon Sep 17 00:00:00 2001 From: cristy Date: Tue, 6 Nov 2012 12:41:35 +0000 Subject: [PATCH] --- PerlMagick/Magick.xs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/PerlMagick/Magick.xs b/PerlMagick/Magick.xs index aec0bc116..9df389afe 100644 --- a/PerlMagick/Magick.xs +++ b/PerlMagick/Magick.xs @@ -10924,7 +10924,9 @@ Mogrify(ref,...) epsilon=argument_list[0].real_reference; if (attribute_flag[1] != 0) channel=(ChannelType) argument_list[1].integer_reference; - (void) PerceptibleImageChannel(image,channel,epsilon,exception); + channel_mask=SetImageChannelMask(image,channel); + (void) PerceptibleImage(image,epsilon,exception); + (void) SetImageChannelMask(image,channel_mask); break; } } -- 2.50.1