From c0c11efa4ffd579b8f4f381ed8a6dc42fb80fe0f Mon Sep 17 00:00:00 2001
From: cristy <urban-warrior@git.imagemagick.org>
Date: Mon, 6 Feb 2012 17:14:54 +0000
Subject: [PATCH]

---
 PerlMagick/demo/lsys.pl                             |   6 +++---
 .../demo/{pink_flower.gif => pink-flower.gif}       | Bin
 PerlMagick/demo/{pixel_fx.pl => pixel-fx.pl}        |   2 +-
 PerlMagick/demo/{red_flower.gif => red-flower.gif}  | Bin
 PerlMagick/demo/single-pixels.pl                    |   2 +-
 .../demo/{yellow_flower.gif => yellow-flower.gif}   | Bin
 6 files changed, 5 insertions(+), 5 deletions(-)
 rename PerlMagick/demo/{pink_flower.gif => pink-flower.gif} (100%)
 rename PerlMagick/demo/{pixel_fx.pl => pixel-fx.pl} (98%)
 rename PerlMagick/demo/{red_flower.gif => red-flower.gif} (100%)
 rename PerlMagick/demo/{yellow_flower.gif => yellow-flower.gif} (100%)

diff --git a/PerlMagick/demo/lsys.pl b/PerlMagick/demo/lsys.pl
index 7f9d0bdb6..d574043fe 100644
--- a/PerlMagick/demo/lsys.pl
+++ b/PerlMagick/demo/lsys.pl
@@ -49,13 +49,13 @@ sub lsys_init
   
   # Create the flower images
   $pink_flower = new Image::Magick;
-  $pink_flower->Read('pink_flower.gif');
+  $pink_flower->Read('pink-flower.gif');
   
   $red_flower = new Image::Magick;
-  $red_flower->Read('red_flower.gif');
+  $red_flower->Read('red-flower.gif');
   
   $yellow_flower = new Image::Magick;
-  $yellow_flower->Read('yellow_flower.gif');
+  $yellow_flower->Read('yellow-flower.gif');
   
   # Turtle:  the midpoint of the bottom edge of the image, pointing up.
   $turtle=new Turtle($imagesize/2, $imagesize, 0, 1);
diff --git a/PerlMagick/demo/pink_flower.gif b/PerlMagick/demo/pink-flower.gif
similarity index 100%
rename from PerlMagick/demo/pink_flower.gif
rename to PerlMagick/demo/pink-flower.gif
diff --git a/PerlMagick/demo/pixel_fx.pl b/PerlMagick/demo/pixel-fx.pl
similarity index 98%
rename from PerlMagick/demo/pixel_fx.pl
rename to PerlMagick/demo/pixel-fx.pl
index 37e98aae5..61cd5ef3f 100755
--- a/PerlMagick/demo/pixel_fx.pl
+++ b/PerlMagick/demo/pixel-fx.pl
@@ -49,5 +49,5 @@ for( my $j = 0; $j < $height; $j++ ) {
 
 # display the result (or you could save it)
 $dest->Write('win:');
-$dest->Write('pixel_fx.gif');
+$dest->Write('pixel-fx.gif');
 
diff --git a/PerlMagick/demo/red_flower.gif b/PerlMagick/demo/red-flower.gif
similarity index 100%
rename from PerlMagick/demo/red_flower.gif
rename to PerlMagick/demo/red-flower.gif
diff --git a/PerlMagick/demo/single-pixels.pl b/PerlMagick/demo/single-pixels.pl
index 2fa389245..e364c0fae 100755
--- a/PerlMagick/demo/single-pixels.pl
+++ b/PerlMagick/demo/single-pixels.pl
@@ -44,5 +44,5 @@ $im->Scale('1000%');
 
 # Output the changed pixels
 $im->Write('win:');
-$im->Write('single_pixels.gif');
+$im->Write('single-pixels.gif');
 
diff --git a/PerlMagick/demo/yellow_flower.gif b/PerlMagick/demo/yellow-flower.gif
similarity index 100%
rename from PerlMagick/demo/yellow_flower.gif
rename to PerlMagick/demo/yellow-flower.gif
-- 
2.50.1