(no commit message)

diff --git a/PerlMagick/Magick.xs b/PerlMagick/Magick.xs
index 6decaf47b0896482e27be3678dc746f2ee8210f8..22b214c99f5eb87b4951ff566b31f7c8857db800 100644 (file)
--- a/PerlMagick/Magick.xs
+++ b/PerlMagick/Magick.xs
@@ -3599,7 +3599,7 @@ EvaluateImages(ref)
         if (in < 0)
           {
             ThrowPerlException(exception,OptionError,"UnrecognizedType",
-              SvPV(ST(i),na));
+              SvPV(ST(1),na));
             return;
           }
         op=(MagickEvaluateOperator) in;
@@ -3615,9 +3615,6 @@ EvaluateImages(ref)
           {
             if (LocaleCompare(attribute,"operator") == 0)
               {
-                Image
-                  *next;
-
                 long
                   in;