IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Feb 10, 2009, 11:05:52 AM (17 years ago)
Author:
bills
Message:

honor the --replace and --release flags remove automatic --release

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ippScripts/scripts/magic_destreak.pl

    r21371 r21435  
    3232my ($replace, $remove, $release);
    3333my ($dbname, $save_temps, $verbose, $no_update, $no_op, $logfile);
    34 
    35 # XXX: remove this
    36 $release = 1;
    3734
    3835GetOptions(
     
    104101
    105102#
    106 # parse the replace and remove arguments check for errors and set upt
     103# parse the replace and remove arguments check for errors and set up
    107104# the appropriate paths
    108 if (defined($replace) and ($replace eq "F")) {
     105if (defined($replace) and ($replace eq "T")) {
     106    $replace = 1;
     107} else {
    109108    $replace = 0;
    110109}
     
    115114}
    116115
    117 if (defined($remove) and ($remove eq "F")) {
     116if (defined($remove) and ($remove eq "T")) {
     117    $remove = 1;
     118} else {
    118119    $remove = 0;
    119120}
     
    203204    my $command = "$streaksremove -stage $stage -tmproot $outroot -streaks $streaks -image $image";
    204205
    205     $command .= " -release" if $release;
    206 
    207206    $command .= " -class_id $class_id" if defined $class_id;
    208207    $command .= " -recovery $recoveryroot" if defined $recoveryroot;
     
    212211    $command .= " -weight $weight" if defined $weight;
    213212    $command .= " -skycelllist $skycell_list" if defined $skycell_list;
     213    $command .= " -replace" if $replace;
     214    $command .= " -remove" if $remove;
     215    $command .= " -release" if $release;
    214216    $command .= " -dbname $dbname" if defined $dbname;
    215217    unless (defined $no_op) {
     
    232234    $command   .= " -magic_ds_id $magic_ds_id";
    233235    $command   .= " -component $component";
     236    $command   .= " -setmagicked" if $replace;
    234237    $command   .= " -backup_path_base $backup_path_base" if $backup_path_base;
    235238    $command   .= " -recovery_path_base $recovery_path_base" if $recovery_path_base;
Note: See TracChangeset for help on using the changeset viewer.