Changeset 32379 for trunk/ippScripts/scripts/diff_skycell.pl
- Timestamp:
- Sep 9, 2011, 11:05:10 AM (15 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/diff_skycell.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/diff_skycell.pl
r31941 r32379 40 40 my ($skycell_id, $diff_skyfile_id); 41 41 my ($use_convolved); 42 my $zaplog = 0;43 42 44 43 GetOptions( … … 57 56 'no-op' => \$no_op, # Don't do any operations? 58 57 'redirect-output' => \$redirect, 59 'zaplog' => \$zaplog, # delete any previous log file60 58 ) or pod2usage( 2 ); 61 59 … … 79 77 80 78 # XXX camera is not known here; cannot use filerules... 81 # bills 2011-03-07 This is unfortunate because it prevents us from using prepare_output ...82 # my $logDest = $ipprc->filename("LOG.EXP", $outroot);83 79 my $logDest = "$outroot.log"; 84 80 if ($run_state eq 'update') { 85 81 $logDest .= '.update'; 86 # ... well we can just do the dirty work here 87 $ipprc->kill_file($logDest); 88 } elsif ($zaplog) { 89 $ipprc->kill_file($logDest); 90 } 91 $ipprc->redirect_output($logDest) or my_die( "Unable to redirect output", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR ) if $redirect; 82 } 83 $ipprc->redirect_to_logfile($logDest) or my_die( "Unable to redirect output", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR ) if $redirect; 92 84 93 85 my $source_id = $ipprc->source_id($dbname, $PS_TABLE_ID_DIFF);
Note:
See TracChangeset
for help on using the changeset viewer.
