[gimp-perl] If too many args to PDB call, report how many right.

[Ed J <edj src gnome org>]

commit d4ec97d3c7acfc27457c563be2248810450fb411
Author: Ed J <edj src gnome org>
Date:   Mon Jul 7 17:10:27 2014 +0100

    If too many args to PDB call, report how many right.

 Gimp/Lib.xs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/Gimp/Lib.xs b/Gimp/Lib.xs
index 46a7e49..537f7fc 100644
--- a/Gimp/Lib.xs
+++ b/Gimp/Lib.xs
@@ -1551,7 +1551,7 @@ PPCODE:
       i < nparams ? __("not enough") : __("too many"),
       proc_name,
       nparams,
-      i
+      items - 1 /* -1 because 0th is proc_name */
     );
 
     if (nparams)