Changeset 28628 for trunk/pstamp/scripts/pstamp_job_run.pl
- Timestamp:
- Jul 7, 2010, 4:22:55 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_job_run.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_job_run.pl
r27953 r28628 92 92 my_die("argument list is empty", $job_id, $PS_EXIT_DATA_ERROR) if !$argString; 93 93 94 # XXX: remove -astrom from argString and add it here95 96 94 $argString .= " -file $params->{image}"; 97 95 $argString .= " -mask $params->{mask}"; 96 my @file_list = ($params->{image}, $params->{mask}); 98 97 if ($options & $PSTAMP_SELECT_VARIANCE) { 99 98 $argString .= " -variance $params->{weight}"; 100 } 99 push @file_list, $params->{weight}; 100 } 101 102 if ($params->{astrom}) { 103 $argString .= " -astrom $params->{astrom}"; 104 push @file_list, $params->{astrom}; 105 } 106 107 check_files(@file_list); 101 108 102 109 my $command = "$ppstamp $outputBase $argString"; … … 341 348 } 342 349 350 sub check_files { 351 foreach my $f (@_) { 352 if (!$ipprc->file_exists($f)) { 353 my_die( "file $f does not exist:", $job_id, $PS_EXIT_SYS_ERROR); 354 } 355 } 356 } 357 343 358 sub my_die 344 359 {
Note:
See TracChangeset
for help on using the changeset viewer.
