[gimp-perl] Reflect multi-level verbose.

[Ed J <edj src gnome org>]

commit 5558cd7d69d0d8e2cec8bcfd1d10cbb792db5357
Author: Ed J <edj src gnome org>
Date:   Tue May 20 06:02:19 2014 +0100

    Reflect multi-level verbose.

 t/netplugin.t |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/t/netplugin.t b/t/netplugin.t
index 0a985b7..e5f1312 100644
--- a/t/netplugin.t
+++ b/t/netplugin.t
@@ -2,7 +2,7 @@ use strict;
 use Test::More;
 our ($dir, $DEBUG);
 BEGIN {
-#  $Gimp::verbose = 1;
+#  $Gimp::verbose = 3;
   $DEBUG = 0;
   require 't/gimpsetup.pl';
   # most minimal and elegant would be to symlink sandbox gimp-dir's
@@ -47,7 +47,7 @@ for my $test (@testbench) {
   }
   my $output = "$scratchdir/out.xcf";
   unshift @$actualparams, '--output', $output;
-  unshift @$actualparams, '-v' if $Gimp::verbose;
+  unshift @$actualparams, ('-v') x $Gimp::verbose;
   unshift @$actualparams, '-p', $name if @{$file2procs{$proc2file{$name}}} > 1;
   my @perl = ($^X, '-Mblib');
 #use Data::Dumper;warn Dumper(Gimp->procedural_db_proc_info("perl_fu_$name"));