From: cristy <urban-warrior@git.imagemagick.org>
Date: Mon, 6 Feb 2012 17:07:50 +0000 (+0000)
Subject: (no commit message)
X-Git-Tag: 7.0.1-0~6240
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=93ea8da49daf314167eff2590546165e4c6be695;p=imagemagick

---

diff --git a/PerlMagick/demo/compose_specials.pl b/PerlMagick/demo/compose_specials.pl
index 325ca53fc..c98fac9be 100755
--- a/PerlMagick/demo/compose_specials.pl
+++ b/PerlMagick/demo/compose_specials.pl
@@ -37,9 +37,9 @@ my $offset="+10+10";
 
 # Circle Mask Image (same size as Destination)
 my $circle=Image::Magick->new();
-$circle->Set(size=>'100x100');
+$circle->Set(size=>'80x80');
 $circle->Read('xc:black');
-$circle->Draw(fill=>'white',primitive=>'circle',points=>'49.5,49.5 10,49.5');
+$circle->Draw(fill=>'white',primitive=>'circle',points=>'39.5,39.5 10,39.5');
 
 my $texture=Image::Magick->new();
 $texture->Read('pattern:checkerboard');