From: cristy <urban-warrior@git.imagemagick.org>
Date: Tue, 7 Jun 2011 00:44:28 +0000 (+0000)
Subject: (no commit message)
X-Git-Tag: 7.0.1-0~7455
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=8030dcfaa693dd227cf88c17499a4a2fa97fdea9;p=imagemagick

---

diff --git a/PerlMagick/Changelog b/PerlMagick/Changelog
index 6ea8371c6..dc84198fd 100644
--- a/PerlMagick/Changelog
+++ b/PerlMagick/Changelog
@@ -1,3 +1,6 @@
+2011-06-06  6.7.0-5 Cristy  <quetzlzacatenango@image...>
+  * Set modulate() colorspace predicated on parameter (e.g. brightness is HSB).
+
 2011-01-25  6.6.7-3 Cristy  <quetzlzacatenango@image...>
   * Verify color parameter is a Perl array to avoid seg fault (reference
     http://www.imagemagick.org/discourse-server/viewtopic.php?f=7&t=17928).
diff --git a/PerlMagick/Magick.xs b/PerlMagick/Magick.xs
index ad5d5a12f..a2ef0daf1 100644
--- a/PerlMagick/Magick.xs
+++ b/PerlMagick/Magick.xs
@@ -8806,10 +8806,13 @@ Mogrify(ref,...)
           if (attribute_flag[3] != 0)
             {
               geometry_info.sigma=argument_list[3].real_reference;
-              SetImageArtifact(image,"modulate:colorspace","HSB");
+              SetImageArtifact(image,"modulate:colorspace","HWB");
             }
           if (attribute_flag[4] != 0)
-            geometry_info.rho=argument_list[4].real_reference;
+            {
+              geometry_info.rho=argument_list[4].real_reference;
+              SetImageArtifact(image,"modulate:colorspace","HSB");
+            }
           if (attribute_flag[5] != 0)
             {
               geometry_info.sigma=argument_list[5].real_reference;