From: cristy <urban-warrior@git.imagemagick.org>
Date: Tue, 6 Nov 2012 12:50:04 +0000 (+0000)
Subject: (no commit message)
X-Git-Tag: 7.0.1-0~4746
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=e8eaa15ac1b6a8bd33d2c314d91cca36b9dcb8d8;p=imagemagick

---

diff --git a/PerlMagick/demo/demo.pl b/PerlMagick/demo/demo.pl
index b0be4dbea..76671b010 100644
--- a/PerlMagick/demo/demo.pl
+++ b/PerlMagick/demo/demo.pl
@@ -113,6 +113,7 @@ print "Composite...\n";
 $example=$model->Clone();
 $example->Label('Composite');
 $example->Composite(image=>$smile,compose=>'over',geometry=>'+35+65');
+$example->Clamp();
 push(@$images,$example);
 
 print "Contrast...\n";
@@ -249,6 +250,7 @@ print "Level...\n";
 $example=$model->Clone();
 $example->Label('Level');
 $example->Level('20%x');
+$example->Clamp();
 push(@$images,$example);
 
 print "Median Filter...\n";