- samples/gifscale.pl sourced the base value for gif_top from
authorTony Cook <tony@develop=help.com>
Mon, 3 Dec 2007 00:33:44 +0000 (00:33 +0000)
committerTony Cook <tony@develop=help.com>
Mon, 3 Dec 2007 00:33:44 +0000 (00:33 +0000)
   gif_left.
   Thanks to Eleneldil G. Arilou for pointing this out.

Changes
samples/gifscale.pl

diff --git a/Changes b/Changes
index 5735977..6ed31ba 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,15 @@
 Imager release history.  Older releases can be found in Changes.old
 
+Imager 0.62 - unreleased
+===========
+
+Bug fixes:
+
+ - samples/gifscale.pl sourced the base value for gif_top from
+   gif_left.
+   Thanks to Eleneldil G. Arilou for pointing this out.
+
+
 Imager 0.61_02 - 28 November 2007
 ==============
 
index a7b3a4a..9d4171a 100644 (file)
@@ -40,7 +40,7 @@ for my $in (@in) {
   $scaled->settag(name => 'gif_left', 
                  value => $factor * $in->tags(name => 'gif_left'));
   $scaled->settag(name => 'gif_top', 
-                 value => $factor * $in->tags(name => 'gif_left'));
+                 value => $factor * $in->tags(name => 'gif_top'));
 
   $scaled->settag(name => 'gif_screen_width', value => $out_screen_width);
   $scaled->settag(name => 'gif_screen_height', value => $out_screen_height);