From: Cristy <mikayla-grace@urban-warrior.org>
Date: Mon, 22 Apr 2019 14:20:02 +0000 (-0400)
Subject: ...
X-Git-Tag: 7.0.8-42~6
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=f538b0f49e507ab962aeec492a9c499d0ac068ad;p=imagemagick

...
---

diff --git a/PerlMagick/demo/composite.pl b/PerlMagick/demo/composite.pl
index 987be1154..943ac5958 100644
--- a/PerlMagick/demo/composite.pl
+++ b/PerlMagick/demo/composite.pl
@@ -22,15 +22,15 @@ for ($angle=0; $angle < 360; $angle+=30)
   $thumbnail->Composite(image=>$smile,gravity=>"NorthWest",x=>$x,y=>$y,
     rotate=>$angle);
   $thumbnail->Composite(image=>$smile,gravity=>"North",y=>$y,rotate=>$angle);
-  $thumbnail->Composite(image=>$smile,gravity=>"NorthEast",x=>$x,y=>$y,
+  $thumbnail->Composite(image=>$smile,gravity=>"NorthEast",x=>-$x,y=>$y,
     rotate=>$angle);
   $thumbnail->Composite(image=>$smile,gravity=>"West",x=>$x,rotate=>$angle);
   $thumbnail->Composite(image=>$smile,gravity=>"Center",rotate=>$angle);
-  $thumbnail->Composite(image=>$smile,gravity=>"East",x=>$x,rotate=>$angle);
-  $thumbnail->Composite(image=>$smile,gravity=>"SouthWest",x=>$x,y=>$y,
+  $thumbnail->Composite(image=>$smile,gravity=>"East",x=>-$x,rotate=>$angle);
+  $thumbnail->Composite(image=>$smile,gravity=>"SouthWest",x=>$x,y=>-$y,
     rotate=>$angle);
-  $thumbnail->Composite(image=>$smile,gravity=>"South",y=>$y,rotate=>$angle);
-  $thumbnail->Composite(image=>$smile,gravity=>"SouthEast",x=>$x,y=>$y,
+  $thumbnail->Composite(image=>$smile,gravity=>"South",y=>-$y,rotate=>$angle);
+  $thumbnail->Composite(image=>$smile,gravity=>"SouthEast",x=>-$x,y=>-$y,
     rotate=>$angle);
   push(@$image,$thumbnail);
 }