...

diff --git a/PerlMagick/demo/composite.pl b/PerlMagick/demo/composite.pl
index 943ac5958fcadc250a74b97ce12edb9794105055..987be11543b29272a165b2b4def8bf3bd462118f 100644 (file)
--- 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);
 }