IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 30114


Ignore:
Timestamp:
Dec 18, 2010, 8:48:38 AM (15 years ago)
Author:
watersc1
Message:

successful burntool caused error due to leftover command stub

File:
1 edited

Legend:

Unmodified
Added
Removed
  • tags/ipp-20101215/ippScripts/scripts/register_imfile.pl

    r30049 r30114  
    287287    if ($burntool_data->{burnable} == 0) {
    288288        $regtool_update .= " -burntool_state 0 -set_state pending_burntool ";
     289        unless ($no_update) {
     290            my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
     291                IPC::Cmd::run(command => $regtool_update, verbose => $verbose);
     292            unless ($success) {
     293                $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
     294                warn ("Unable to perform regtool -addprocessedimfile: $error_code");
     295                exit($error_code);
     296            }
     297        } else {
     298            print "skipping command: $command\n";
     299        }
    289300    }
    290301    else {
     
    296307        $apply_command .= " --verbose " if $verbose;
    297308        print "$apply_command\n";
    298         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
    299             IPC::Cmd::run(command => $apply_command, verbose => $verbose);
    300         unless ($success) {
    301             $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    302             warn ("Unable to perform ipp_apply_burntool_single.pl: $error_code");
    303             exit($error_code);
     309        unless ($no_update) {
     310            my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
     311                IPC::Cmd::run(command => $apply_command, verbose => $verbose);
     312            unless ($success) {
     313                $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
     314                warn ("Unable to perform ipp_apply_burntool_single.pl: $error_code");
     315                exit($error_code);
     316            }
    304317        }
    305318    }   
    306319
    307     unless ($no_update) {
    308         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
    309             IPC::Cmd::run(command => $regtool_update, verbose => $verbose);
    310         unless ($success) {
    311             $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    312             warn ("Unable to perform regtool -addprocessedimfile: $error_code");
    313             exit($error_code);
    314         }
    315     } else {
    316         print "skipping command: $command\n";
    317     }
    318320
    319321}
Note: See TracChangeset for help on using the changeset viewer.