Index: /branches/pap_magic/ippScripts/scripts/ipp_serial_magic.pl
===================================================================
--- /branches/pap_magic/ippScripts/scripts/ipp_serial_magic.pl	(revision 24152)
+++ /branches/pap_magic/ippScripts/scripts/ipp_serial_magic.pl	(revision 24153)
@@ -52,5 +52,5 @@
         $command .= " -magic_id $identifier" if defined $identifier;
         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-            run( command => $command, verbose => 1 );
+            run( command => $command, verbose => $verbose );
         die "Unable to get magic tree list: $error_code\n" if not $success;
         @whole = split /\n/, join( '', @$stdout_buf );
@@ -86,5 +86,5 @@
                 $command .= " --no-update" if defined $no_update;
                 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-                    run( command => $command, verbose => 1 );
+                    run( command => $command, verbose => $verbose );
                 die "Unable to do magic tree on $magic_id: $error_code\n" if not $success;
             }
@@ -102,5 +102,5 @@
         $command .= " -magic_id $identifier" if defined $identifier;
         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-            run( command => $command, verbose => 1 );
+            run( command => $command, verbose => $verbose );
         die "Unable to get magic tree list: $error_code\n" if not $success;
         @whole = split /\n/, join( '', @$stdout_buf );
@@ -134,5 +134,5 @@
                 $command .= " --no-update" if defined $no_update;
                 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-                    run( command => $command, verbose => 1 );
+                    run( command => $command, verbose => $verbose );
                 die "Unable to do magic process on $magic_id $node: $error_code\n" if not $success;
             }