Index: trunk/ippScripts/scripts/magic_tree.pl
===================================================================
--- trunk/ippScripts/scripts/magic_tree.pl	(revision 15689)
+++ trunk/ippScripts/scripts/magic_tree.pl	(revision 16331)
@@ -44,5 +44,5 @@
 
 # Parse the command-line arguments
-my ($magic_id, $tess_id, $camera, $ra0, $dec0, $dbname, $workdir, $save_temps, $no_update, $no_op);
+my ($magic_id, $tess_id, $camera, $ra0, $dec0, $dbname, $workdir, $save_temps, $verbose, $no_update, $no_op);
 GetOptions(
 	   'magic_id=s'    => \$magic_id,   # Magic identifier
@@ -54,4 +54,5 @@
 	   'workdir=s'     => \$workdir,    # Working directory, for output files
 	   'save-temps'    => \$save_temps, # Save temporary files?
+	   'verbose'       => \$verbose,    # Print stuff?
 	   'no-update'     => \$no_update,  # Don't update the database?
 	   'no-op'         => \$no_op,	    # Don't do any operations?
@@ -88,5 +89,5 @@
     $command .= " -dbname $dbname" if defined $dbname;
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-	run(command => $command, verbose => 1);
+	run(command => $command, verbose => $verbose);
     unless ($success) {
 	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
@@ -105,5 +106,5 @@
 }
 
-generate_skycells($ipprc, $tess_id, \@skycells, $workdir) or
+generate_skycells($ipprc, $tess_id, \@skycells, $workdir, $verbose) or
     &my_die("Unable to generate skycells", $magic_id, $PS_EXIT_PROG_ERROR);
 
@@ -213,5 +214,5 @@
     unless ($no_update) {
 	my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-	    run(command => $command, verbose => 1);
+	    run(command => $command, verbose => $verbose);
 	unless ($success) {
 	    $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);