- Timestamp:
- Oct 2, 2009, 5:10:19 PM (17 years ago)
- Location:
- branches/eam_branches/20090820
- Files:
-
- 2 edited
-
. (modified) (1 prop)
-
ippScripts/scripts/magic_destreak_revert.pl (modified) (3 diffs, 1 prop)
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/20090820
- Property svn:mergeinfo changed
-
branches/eam_branches/20090820/ippScripts/scripts/magic_destreak_revert.pl
- Property svn:mergeinfo changed
r25024 r25766 191 191 } 192 192 193 revert_files($ image, $mask, $weight, $sources, $astrom, $bimage, $bmask, $bweight, $bsources, $bastrom);194 195 if ($stage eq "diff" ) {193 revert_files($replace, $image, $mask, $weight, $sources, $astrom, $bimage, $bmask, $bweight, $bsources, $bastrom); 194 195 if ($stage eq "diff" and $inverse) { 196 196 my $name = "PPSUB.INVERSE"; 197 197 $image = $ipprc->filename($name, $path_base); … … 203 203 $bweight = $ipprc->filename("$name.VARIANCE", $backup_path_base); 204 204 $bsources = $ipprc->filename("$name.SOURCES", $backup_path_base); 205 revert_files($ image, $mask, $weight, $sources, undef, $bimage, $bmask, $bweight, $bsources, undef);205 revert_files($replace, $image, $mask, $weight, $sources, undef, $bimage, $bmask, $bweight, $bsources, undef); 206 206 } 207 207 208 208 # now revert the row in the database 209 209 { 210 my $command = "$magicdstool -revertdestreakedfile ";210 my $command = "$magicdstool -revertdestreakedfile -i_am_sure"; 211 211 $command .= " -magic_ds_id $magic_ds_id"; 212 212 $command .= " -component $component"; … … 231 231 232 232 sub revert_files { 233 my $replace = shift; 234 return if !$replace; 235 233 236 my $image = shift; 234 237 my $mask = shift;
Note:
See TracChangeset
for help on using the changeset viewer.
