Index: /tags/ipp-20110622/ippScripts/scripts/register_imfile.pl
===================================================================
--- /tags/ipp-20110622/ippScripts/scripts/register_imfile.pl	(revision 32404)
+++ /tags/ipp-20110622/ippScripts/scripts/register_imfile.pl	(revision 32405)
@@ -60,5 +60,5 @@
 
 my $ipprc = PS::IPP::Config->new() or my_die_for_add( "Unable to set up", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_CONFIG_ERROR ); # IPP configuration
-$ipprc->redirect_output($logfile) or my_die_for_add( "Unable to redirect output", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_SYS_ERROR ) if $logfile;
+$ipprc->redirect_to_logfile($logfile) or my_die_for_add( "Unable to redirect output", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_SYS_ERROR ) if $logfile;
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
@@ -147,5 +147,6 @@
     elsif (($isGPC1 == 1) && ($burntoolStateCurrent == 1)) {
 #       print STDERR "In the good region: >>$burntoolStateCurrent<<\n";
-        my $ppConfigDump_cmd = "$ppConfigDump -camera GPC1 -dump-camera -";
+#        my $ppConfigDump_cmd = "$ppConfigDump -camera GPC1 -get-key BURNTOOL.STATE.GOOD";
+  	my $ppConfigDump_cmd = "$ppConfigDump -camera GPC1 -dump-camera -";
         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
             IPC::Cmd::run(command => $ppConfigDump_cmd, verbose => $verbose);
@@ -522,4 +523,5 @@
         $command .= " -class_id $class_id";
         $command .= " -fault $exit_code";
+	$command .= " -set_state pending_burntool ";
         $command .= " -hostname $host" if defined $host;
         $command .= " -dbname $dbname" if defined $dbname;