Fix PerlMagick compile error

diff --git a/PerlMagick/Magick.xs b/PerlMagick/Magick.xs
index b81cf4de599a195f0aa52d14be60aad7c6bb8393..22524926694d7c533970abf76d544e18ec68f8d5 100644 (file)
--- a/PerlMagick/Magick.xs
+++ b/PerlMagick/Magick.xs
@@ -11314,10 +11314,10 @@ Mogrify(ref,...)
           PixelInfo
             color;
 
-          (void) QueryMagickColor("none",&color,exception);
+          (void) QueryColorCompliance("none",AllCompliance,&color,exception);
           if (attribute_flag[0] != 0)
-            (void) QueryMagickColor(argument_list[0].string_reference,
-              &color,exception);
+            (void) QueryColorCompliance(argument_list[0].string_reference,
+              AllCompliance,&color,exception);
           (void) SetImageColor(image,&color,exception);
           break;
         }

diff --git a/PerlMagick/quantum/quantum.xs.in b/PerlMagick/quantum/quantum.xs.in
index 32154789df0833697de063fbe1cea6c93152a7fd..b7b866d64cec5e627beabd8c595ad083e64774d4 100644 (file)
--- a/PerlMagick/quantum/quantum.xs.in
+++ b/PerlMagick/quantum/quantum.xs.in
@@ -11314,10 +11314,10 @@ Mogrify(ref,...)
           PixelInfo
             color;
 
-          (void) QueryMagickColor("none",&color,exception);
+          (void) QueryColorCompliance("none",AllCompliance,&color,exception);
           if (attribute_flag[0] != 0)
-            (void) QueryMagickColor(argument_list[0].string_reference,
-              &color,exception);
+            (void) QueryColorCompliance(argument_list[0].string_reference,
+              AllCompliance,&color,exception);
           (void) SetImageColor(image,&color,exception);
           break;
         }