(no commit message)

diff --git a/PerlMagick/demo/pixel-fx.pl b/PerlMagick/demo/pixel-fx.pl
index 61cd5ef3f711e3234e241d13d9b37743068df911..ae55288a5a2c78268be17d0cd2c7102925da10c4 100755 (executable)
--- a/PerlMagick/demo/pixel-fx.pl
+++ b/PerlMagick/demo/pixel-fx.pl
@@ -22,7 +22,7 @@ warn("$w")  if $w;
 exit  if $w =~ /^Exception/;
 
 
-# make a clone of the image for modifications
+# make a clone of the image (preserve input, modify output)
 my $dest = $orig->Clone();
 
 # You could enlarge destination image here if you like.